Return to pa_vstring.h CVS log

Up to [parser3project] / parser3 / src / types

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

1.23      paf         1: /**    @file
                      2:        Parser: @b string parser class decl.
1.13      paf         3: 
1.54.2.5  paf         4:        Copyright (c) 2001-2003 ArtLebedev Group (http://www.artlebedev.com)
1.41      paf         5:        Author: Alexandr Petrosian <paf@design.ru> (http://paf.design.ru)
1.1       paf         6: */
                      7: 
                      8: #ifndef PA_VSTRING_H
                      9: #define PA_VSTRING_H
1.47      paf        10: 
1.54.2.11.2.1! (paf       11:: static const char* IDENT_VSTRING_H="$Date: 2003/02/17 17:05:04 $";
1.1       paf        12: 
1.54.2.2  paf        13: // includes
1.1       paf        14: 
1.4       paf        15: #include "pa_vstateless_object.h"
1.1       paf        16: #include "pa_vdouble.h"
1.54.2.2  paf        17: 
                     18: // externs
1.24      paf        19: 
1.54.2.8  paf        20: extern MethodedPtr string_class;
1.1       paf        21: 
1.13      paf        22: /// value of type 'string'. implemented with @c String
1.54.2.11  paf        23: class VString: public VStateless_object {
1.1       paf        24: public: // Value
                     25: 
1.54.2.5  paf        26:        override const char* type() const { return "string"; }
1.54.2.8  paf        27:        override VStateless_class *get_class() { return string_class.get(); }
1.31      parser     28:        /// VString: eq ''=false, ne ''=true
1.54.2.1  paf        29:        override bool is_defined() const { return !fstring->is_empty(); }
1.32      parser     30:        /// VString: 0 or !0
1.54.2.1  paf        31:        override bool as_bool() const { return as_double()!=0; }
1.16      paf        32:        /// VString: true
1.54.2.1  paf        33:        override bool is_string() const { return true; }
1.14      paf        34:        /// VString: fstring as VDouble or this depending on return_string_as_is
1.54.2.1  paf        35:        override ValuePtr as_expr_result(bool return_string_as_is=false) { 
1.14      paf        36:                if(return_string_as_is)
1.54.2.7  paf        37:                        return ValuePtr(this);
1.14      paf        38:                else
1.54.2.1  paf        39:                        return ValuePtr(new VDouble(as_double())); 
1.14      paf        40:        }
1.13      paf        41:        /// VString: fstring
1.54.2.11.2.1! (paf       42::       override const String& get_string(Pool*) { return fstring; };
1.13      paf        43:        /// VString: fstring
1.54.2.1  paf        44:        override double as_double() const { return fstring->as_double(); }
1.26      parser     45:        /// VString: fstring
1.54.2.1  paf        46:        override int as_int() const { return fstring->as_int(); }
1.20      paf        47: 
                     48:        /// VString: vfile
1.54.2.11.2.1! (paf       49::       override VFilePtr as_vfile(String::Untaint_lang lang=String::UL_UNSPECIFIED,
1.29      parser     50:                bool origins_mode=false);
1.9       paf        51: 
1.21      paf        52:        /// VString: $method
1.54.2.11.2.1! (paf       53::       override ValuePtr get_element(const String& aname, Value& aself, bool looking_up) {
1.21      paf        54:                // $method
1.54.2.1  paf        55:                if(ValuePtr result=VStateless_object::get_element(aname, aself, looking_up))
1.9       paf        56:                        return result;
                     57: 
                     58:                // bad $string.field
1.36      parser     59:                bark("(%s) does not have fields",
1.54.2.1  paf        60:                        "%s method not found", aname);  
1.54.2.7  paf        61:                return ValuePtr(0);
1.9       paf        62:        }
1.1       paf        63: 
                     64: public: // usage
                     65: 
1.54.2.9  paf        66:        VString(): fstring(new String) {}
1.54.2.11.2.1! (paf       67::       VString(const String& avalue): fstring(avalue) {}
1.1       paf        68: 
1.54.2.11.2.1! (paf       69::       const String& string() const { return fstring; }
        !            70::       void set_string(const String& astring) { fstring=astring; }
1.1       paf        71: 
                     72: private:
1.54.2.11.2.1! (paf       73::       const String& fstring;
1.1       paf        74: 
                     75: };
1.54.2.1  paf        76: 
1.54.2.11.2.1! (paf       77:: typedef object_ptr<VString> VString* ;
1.1       paf        78: 
                     79: #endif