Annotation of parser3/src/types/pa_vstring.h, revision 1.29

1.23      paf         1: /**    @file
                      2:        Parser: @b string parser class decl.
1.13      paf         3: 
1.1       paf         4:        Copyright (c) 2001 ArtLebedev Group (http://www.artlebedev.com)
1.13      paf         5: 
1.2       paf         6:        Author: Alexander Petrosyan <paf@design.ru> (http://design.ru/paf)
1.1       paf         7: 
1.29    ! parser      8:        $Id: pa_vstring.h,v 1.28 2001/05/21 16:57:39 parser Exp $
1.1       paf         9: */
                     10: 
                     11: #ifndef PA_VSTRING_H
                     12: #define PA_VSTRING_H
                     13: 
                     14: #include <stdlib.h>
                     15: 
1.4       paf        16: #include "pa_vstateless_object.h"
1.1       paf        17: #include "pa_vdouble.h"
1.24      paf        18: 
                     19: extern Methoded *string_class;
1.1       paf        20: 
1.13      paf        21: /// value of type 'string'. implemented with @c String
1.4       paf        22: class VString : public VStateless_object {
1.1       paf        23: public: // Value
                     24: 
                     25:        const char *type() const { return "string"; }
1.16      paf        26:        /// VString: true
1.17      paf        27:        bool is_string() const { return true; }
1.14      paf        28:        /// VString: fstring as VDouble or this depending on return_string_as_is
1.16      paf        29:        Value *as_expr_result(bool return_string_as_is=false) { 
1.14      paf        30:                if(return_string_as_is)
                     31:                        return this;
                     32:                else
1.16      paf        33:                        return NEW VDouble(pool(), as_double()); 
1.14      paf        34:        }
1.13      paf        35:        /// VString: fstring
1.28      parser     36:        const String *get_string() { return &fstring; };
1.13      paf        37:        /// VString: fstring
1.28      parser     38:        double as_double() { return fstring.as_double(); }
1.26      parser     39:        /// VString: fstring
1.28      parser     40:        int as_int() { return fstring.as_int(); }
1.20      paf        41: 
                     42:        /// VString: vfile
1.29    ! parser     43:        VFile *as_vfile(String::Untaint_lang lang=String::UL_UNSPECIFIED,
        !            44:                bool origins_mode=false);
1.9       paf        45: 
1.21      paf        46:        /// VString: $method
1.9       paf        47:        Value *get_element(const String& name) {
1.21      paf        48:                // $method
1.9       paf        49:                if(Value *result=VStateless_object::get_element(name))
                     50:                        return result;
                     51: 
                     52:                // bad $string.field
                     53:                bark("(%s) does not have fields");  return 0;
                     54:        }
1.12      paf        55: 
                     56: protected: // VAliased
                     57: 
1.15      paf        58:        /// disable .CLASS element. @see VAliased::get_element
1.19      paf        59:        bool hide_class() { return true; }
1.1       paf        60: 
                     61: public: // usage
                     62: 
1.4       paf        63:        VString(Pool& apool) : VStateless_object(apool, *string_class), 
1.28      parser     64:                fstring(*new(apool) String(apool)) {
1.1       paf        65:        }
                     66: 
1.4       paf        67:        VString(const String& avalue) : VStateless_object(avalue.pool(), *string_class),
1.28      parser     68:                fstring(avalue) {
1.1       paf        69:        }
                     70: 
1.28      parser     71:        const String& string() { return fstring; }
1.1       paf        72: 
                     73: private:
1.28      parser     74:        const String fstring;
1.1       paf        75: 
                     76: };
                     77: 
                     78: #endif

E-mail: