Annotation of parser3/src/types/pa_vstring.h, revision 1.52
1.23 paf 1: /** @file
2: Parser: @b string parser class decl.
1.13 paf 3:
1.40 paf 4: Copyright (c) 2001, 2002 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.52 ! paf 11: static const char* IDENT_VSTRING_H="$Date: 2002/08/13 15:55:45 $";
1.1 paf 12:
13: #include <stdlib.h>
14:
1.4 paf 15: #include "pa_vstateless_object.h"
1.1 paf 16: #include "pa_vdouble.h"
1.24 paf 17:
18: extern Methoded *string_class;
1.1 paf 19:
1.13 paf 20: /// value of type 'string'. implemented with @c String
1.44 paf 21: class VString : public VStateless_object {
1.1 paf 22: public: // Value
23:
24: const char *type() const { return "string"; }
1.44 paf 25: VStateless_class *get_class() { return string_class; }
1.31 parser 26: /// VString: eq ''=false, ne ''=true
1.42 paf 27: bool is_defined() const { return !fstring->is_empty(); }
1.32 parser 28: /// VString: 0 or !0
1.34 parser 29: bool as_bool() const { return as_double()!=0; }
1.16 paf 30: /// VString: true
1.17 paf 31: bool is_string() const { return true; }
1.14 paf 32: /// VString: fstring as VDouble or this depending on return_string_as_is
1.16 paf 33: Value *as_expr_result(bool return_string_as_is=false) {
1.14 paf 34: if(return_string_as_is)
35: return this;
36: else
1.16 paf 37: return NEW VDouble(pool(), as_double());
1.14 paf 38: }
1.13 paf 39: /// VString: fstring
1.38 paf 40: const String *get_string() { return fstring; };
1.13 paf 41: /// VString: fstring
1.38 paf 42: double as_double() const { return fstring->as_double(); }
1.26 parser 43: /// VString: fstring
1.38 paf 44: int as_int() const { return fstring->as_int(); }
1.20 paf 45:
46: /// VString: vfile
1.29 parser 47: VFile *as_vfile(String::Untaint_lang lang=String::UL_UNSPECIFIED,
48: bool origins_mode=false);
1.9 paf 49:
1.21 paf 50: /// VString: $method
1.52 ! paf 51: Value *get_element(const String& aname, Value *aself, bool looking_up) {
1.21 paf 52: // $method
1.52 ! paf 53: if(Value *result=VStateless_object::get_element(aname, aself, looking_up))
1.9 paf 54: return result;
55:
56: // bad $string.field
1.36 parser 57: bark("(%s) does not have fields",
1.50 paf 58: "%s method not found", &aname); return 0;
1.9 paf 59: }
1.1 paf 60:
61: public: // usage
62:
1.44 paf 63: /* VString(Pool& apool) : VStateless_object(apool),
1.38 paf 64: fstring(new(apool) String(apool)) {
1.1 paf 65: }
1.43 paf 66: */
1.44 paf 67: VString(const String& avalue) : VStateless_object(avalue.pool()),
1.38 paf 68: fstring(&avalue) {
1.1 paf 69: }
70:
1.45 paf 71: const String& string() const { return *fstring; }
1.38 paf 72: void set_string(const String& astring) { fstring=&astring; }
1.1 paf 73:
74: private:
1.38 paf 75: const String *fstring;
1.1 paf 76:
77: };
78:
79: #endif
E-mail: