Annotation of parser3/src/types/pa_vobject.h, revision 1.35
1.6 paf 1: /** @file
1.7 paf 2: Parser: @b object class decl.
3:
1.15 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: */
7:
8: #ifndef PA_VOBJECT_H
9: #define PA_VOBJECT_H
10:
1.35 ! paf 11: static const char* IDENT_VOBJECT_H="$Date: 2002/08/21 10:18:36 $";
1.19 paf 12:
1.1 paf 13: #include "pa_vjunction.h"
14: #include "pa_vclass.h"
1.4 paf 15: #include "pa_vstateless_object.h"
1.6 paf 16:
1.23 paf 17: // defines
18:
19: #define BASE_NAME "BASE"
20:
1.26 paf 21: /** parser class instance, stores
22: - class VObject::fclass;
23: - fields VObject::ffields (dynamic, not static, which are stored in class).
24: - links to base/derived instances [VObject::fbase, VObject::fderived]
1.6 paf 25: */
1.24 paf 26: class VObject: public VStateless_object {
1.1 paf 27: public: // Value
28:
1.24 paf 29: const char *type() const { return fclass.name_cstr(); }
1.32 paf 30: /*override*/ Value *as(const char *atype, bool looking_up);
1.12 parser 31:
1.25 paf 32: /// VObject: fclass
33: VStateless_class *get_class() { return &fclass; }
34: /*override*/ Value *base_object() { return fbase; }
1.33 paf 35:
36: /*override*/ bool is_defined() const;
37: /*override*/ Value *as_expr_result(bool);
38: /*override*/ int as_int() const;
39: /*override*/ double as_double();
40: /*override*/ bool as_bool() const;
41: /*override*/ VFile *as_vfile(String::Untaint_lang /*lang*/=String::UL_UNSPECIFIED, bool /*origins_mode*/=false);
42:
43: /*override*/ Hash *get_hash(const String *source);
44: /*override*/ Table *get_table();
45:
1.31 paf 46: /*override*/ Value *get_element(const String& aname, Value *aself, bool /*looking_up*/);
1.29 paf 47: /*override*/ bool put_element(const String& aname, Value *avalue, bool replace);
1.1 paf 48:
1.24 paf 49: /// VObject: remember derived [the only client] */
1.26 paf 50: /*override*/ VObject *set_derived(VObject *aderived) {
51: VObject *result=fderived;
1.25 paf 52: fderived=aderived;
1.34 paf 53: return result;
1.24 paf 54: }
55:
1.1 paf 56: public: // creation
57:
1.24 paf 58: VObject(Pool& apool, VStateless_class& aclass) : VStateless_object(apool),
59: fclass(aclass),
60: ffields(apool),
61: fderived(0),
1.25 paf 62: fbase(fclass.base_class()?fclass.base_class()->create_new_value(apool):0) {
1.24 paf 63: if(fbase)
1.25 paf 64: fbase->set_derived(this);
1.1 paf 65: }
66:
67: private:
68:
1.26 paf 69: Value *get_last_derived() {
70: return fderived?fderived->get_last_derived():this;
71: }
72:
73: private:
74:
1.24 paf 75: VStateless_class& fclass;
1.1 paf 76: Hash ffields;
1.26 paf 77: VObject *fderived;
1.24 paf 78: Value *fbase;
1.25 paf 79: };
80:
81: class Temp_derived {
82: Value& fvalue;
1.26 paf 83: VObject *fsaved_derived;
1.25 paf 84: public:
1.26 paf 85: Temp_derived(Value& avalue, VObject *aderived) :
1.25 paf 86: fvalue(avalue),
87: fsaved_derived(avalue.set_derived(aderived)) {}
88: ~Temp_derived() { fvalue.set_derived(fsaved_derived); }
1.1 paf 89: };
90:
91: #endif
E-mail: