Annotation of parser3/src/types/pa_vstring.h, revision 1.31.4.1
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.31.4.1! parser 8: $Id: pa_vstring.h,v 1.31 2001/08/10 10:25:30 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.31 parser 26: /// VString: eq ''=false, ne ''=true
27: bool is_defined() const { return fstring.size()!=0; }
1.31.4.1! parser 28: /// VString: 0 or !0
! 29: bool as_bool() { 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.28 parser 40: const String *get_string() { return &fstring; };
1.13 paf 41: /// VString: fstring
1.28 parser 42: double as_double() { return fstring.as_double(); }
1.26 parser 43: /// VString: fstring
1.28 parser 44: int as_int() { 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.9 paf 51: Value *get_element(const String& name) {
1.21 paf 52: // $method
1.9 paf 53: if(Value *result=VStateless_object::get_element(name))
54: return result;
55:
56: // bad $string.field
57: bark("(%s) does not have fields"); return 0;
58: }
1.12 paf 59:
60: protected: // VAliased
61:
1.15 paf 62: /// disable .CLASS element. @see VAliased::get_element
1.19 paf 63: bool hide_class() { return true; }
1.1 paf 64:
65: public: // usage
66:
1.4 paf 67: VString(Pool& apool) : VStateless_object(apool, *string_class),
1.28 parser 68: fstring(*new(apool) String(apool)) {
1.1 paf 69: }
70:
1.4 paf 71: VString(const String& avalue) : VStateless_object(avalue.pool(), *string_class),
1.28 parser 72: fstring(avalue) {
1.1 paf 73: }
74:
1.28 parser 75: const String& string() { return fstring; }
1.1 paf 76:
77: private:
1.28 parser 78: const String fstring;
1.1 paf 79:
80: };
81:
82: #endif
E-mail: