Annotation of parser3/src/types/pa_vobject.h, revision 1.23
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.23 ! paf 11: static const char* IDENT_VOBJECT_H="$Date: 2002/08/09 14:18:40 $";
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 CLASS_NAME "CLASS"
! 20: #define BASE_NAME "BASE"
! 21:
1.6 paf 22: /** parser class instance,
1.18 paf 23: stores class VObject::fclass_real;
1.6 paf 24: stores fields VObject::ffields (dynamic, not static, which are stored in class).
25: */
1.4 paf 26: class VObject : public VStateless_object {
1.1 paf 27: public: // Value
28:
1.21 paf 29: const char *type() const { return fclass_real.name_cstr(); }
1.22 paf 30: Value *as(const char *atype) { return fclass_real.as(atype); }
1.12 parser 31:
1.18 paf 32: /// VObject: fclass_real
33: VStateless_class *get_class() { return &fclass_real; }
1.12 parser 34: /// VObject : true
35: Value *as_expr_result(bool) { return NEW VBool(pool(), as_bool()); }
36: /// VObject : true
37: bool as_bool() const { return true; }
1.1 paf 38:
1.6 paf 39: /// VObject : (field)=value;(CLASS)=vclass;(method)=method_ref
1.1 paf 40: Value *get_element(const String& name) {
1.9 paf 41: // $field=ffields.field
42: if(Value *result=static_cast<Value *>(ffields.get(name)))
43: return result;
44:
1.23 ! paf 45: // $CLASS
! 46: if(name==CLASS_NAME)
! 47: return get_class();
! 48:
! 49: // $method
1.9 paf 50: return VStateless_object::get_element(name);
1.1 paf 51: }
52:
1.6 paf 53: /// VObject : (field)=value
1.1 paf 54: void put_element(const String& name, Value *value) {
55: // speed1:
56: // will not check for '$CLASS(subst)' trick
57: // will hope that user ain't THAT self-hating person
58: // speed2:
59: // will not check for '$method_name(subst)' trick
60: // -same-
61:
62: ffields.put(name, value);
63: }
64:
65: public: // creation
66:
1.18 paf 67: VObject(Pool& apool, VStateless_class& aclass_real) : VStateless_object(apool),
68: fclass_real(aclass_real),
1.23 ! paf 69: ffields(apool) {//,
! 70: //zz fbase(fclass_real.base()?fclass_real.base()->create_new_value(apool):0) {
1.1 paf 71: }
72:
73: private:
74:
1.18 paf 75: VStateless_class& fclass_real;
1.1 paf 76: Hash ffields;
1.23 ! paf 77: //Value *fbase;
1.1 paf 78: };
79:
80: #endif
E-mail: