Return to pa_vstring.C CVS log

Up to [parser3project] / parser3 / src / types

Annotation of parser3/src/types/pa_vstring.C, revision 1.19

1.1       paf         1: /** @file
1.5       paf         2:        Parser: @b string class.
1.1       paf         3: 
1.17      paf         4:        Copyright(c) 2001, 2002 ArtLebedev Group (http://www.artlebedev.com)
1.16      paf         5:        Author: Alexandr Petrosian <paf@design.ru> (http://paf.design.ru)
1.1       paf         6: 
1.19    ! paf         7:        $Id: pa_vstring.C,v 1.18 2002/04/19 11:59:44 paf Exp $
1.1       paf         8: */
                      9: 
                     10: #include "pa_vstring.h"
                     11: #include "pa_vfile.h"
                     12: 
1.9       parser     13: VFile *VString::as_vfile(String::Untaint_lang lang,
                     14:                bool origins_mode) {
1.1       paf        15:        VFile& result=*NEW VFile(pool());
1.14      paf        16:        const char *cstr=origins_mode?fstring->cstr_debug_origins():fstring->cstr(lang);
1.4       paf        17:        result.set(false/*not tainted*/, cstr, strlen(cstr));
1.1       paf        18:        return &result;
1.8       parser     19: }