Annotation of parser3/src/types/pa_vobject.h, revision 1.36
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.36 ! paf 11: static const char* IDENT_VOBJECT_H="$Date: 2002/10/14 11:24:00 $";
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
1.36 ! paf 33: /*override*/ VStateless_class *get_class() { return &fclass; }
! 34: /*override*/ VStateless_class *get_last_derived_class() { return get_last_derived()->get_class(); }
1.25 paf 35: /*override*/ Value *base_object() { return fbase; }
1.33 paf 36:
37: /*override*/ bool is_defined() const;
38: /*override*/ Value *as_expr_result(bool);
39: /*override*/ int as_int() const;
40: /*override*/ double as_double();
41: /*override*/ bool as_bool() const;
42: /*override*/ VFile *as_vfile(String::Untaint_lang /*lang*/=String::UL_UNSPECIFIED, bool /*origins_mode*/=false);
43:
44: /*override*/ Hash *get_hash(const String *source);
45: /*override*/ Table *get_table();
46:
1.31 paf 47: /*override*/ Value *get_element(const String& aname, Value *aself, bool /*looking_up*/);
1.29 paf 48: /*override*/ bool put_element(const String& aname, Value *avalue, bool replace);
1.1 paf 49:
1.24 paf 50: /// VObject: remember derived [the only client] */
1.26 paf 51: /*override*/ VObject *set_derived(VObject *aderived) {
52: VObject *result=fderived;
1.25 paf 53: fderived=aderived;
1.34 paf 54: return result;
1.24 paf 55: }
56:
1.1 paf 57: public: // creation
58:
1.24 paf 59: VObject(Pool& apool, VStateless_class& aclass) : VStateless_object(apool),
60: fclass(aclass),
61: ffields(apool),
62: fderived(0),
1.25 paf 63: fbase(fclass.base_class()?fclass.base_class()->create_new_value(apool):0) {
1.24 paf 64: if(fbase)
1.25 paf 65: fbase->set_derived(this);
1.1 paf 66: }
67:
68: private:
69:
1.26 paf 70: Value *get_last_derived() {
71: return fderived?fderived->get_last_derived():this;
72: }
73:
74: private:
75:
1.24 paf 76: VStateless_class& fclass;
1.1 paf 77: Hash ffields;
1.26 paf 78: VObject *fderived;
1.24 paf 79: Value *fbase;
1.25 paf 80: };
81:
82: class Temp_derived {
83: Value& fvalue;
1.26 paf 84: VObject *fsaved_derived;
1.25 paf 85: public:
1.26 paf 86: Temp_derived(Value& avalue, VObject *aderived) :
1.25 paf 87: fvalue(avalue),
88: fsaved_derived(avalue.set_derived(aderived)) {}
89: ~Temp_derived() { fvalue.set_derived(fsaved_derived); }
1.1 paf 90: };
91:
92: #endif
E-mail: