Annotation of parser3/src/types/pa_vobject.h, revision 1.18
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:
1.18 ! paf 7: $Id: pa_vobject.h,v 1.17 2002/04/18 13:55:06 paf Exp $
1.1 paf 8: */
9:
10: #ifndef PA_VOBJECT_H
11: #define PA_VOBJECT_H
12:
1.17 paf 13: //#include "pa_valiased.h"
1.1 paf 14: #include "pa_vjunction.h"
15: #include "pa_vclass.h"
1.4 paf 16: #include "pa_vstateless_object.h"
1.6 paf 17:
18: /** parser class instance,
1.18 ! paf 19: stores class VObject::fclass_real;
1.6 paf 20: stores fields VObject::ffields (dynamic, not static, which are stored in class).
21: */
1.4 paf 22: class VObject : public VStateless_object {
1.1 paf 23: public: // Value
24:
25: const char *type() const { return "object"; }
1.12 parser 26:
1.18 ! paf 27: /// VObject: fclass_real
! 28: VStateless_class *get_class() { return &fclass_real; }
1.12 parser 29: /// VObject : true
30: Value *as_expr_result(bool) { return NEW VBool(pool(), as_bool()); }
31: /// VObject : true
32: bool as_bool() const { return true; }
1.1 paf 33:
1.6 paf 34: /// VObject : (field)=value;(CLASS)=vclass;(method)=method_ref
1.1 paf 35: Value *get_element(const String& name) {
1.9 paf 36: // $field=ffields.field
37: if(Value *result=static_cast<Value *>(ffields.get(name)))
38: return result;
39:
1.10 parser 40: // $CLASS,$method
1.9 paf 41: return VStateless_object::get_element(name);
1.1 paf 42: }
43:
1.6 paf 44: /// VObject : (field)=value
1.1 paf 45: void put_element(const String& name, Value *value) {
46: // speed1:
47: // will not check for '$CLASS(subst)' trick
48: // will hope that user ain't THAT self-hating person
49: // speed2:
50: // will not check for '$method_name(subst)' trick
51: // -same-
52:
53: ffields.put(name, value);
54: }
55:
56: public: // creation
57:
1.18 ! paf 58: VObject(Pool& apool, VStateless_class& aclass_real) : VStateless_object(apool),
! 59: fclass_real(aclass_real),
1.1 paf 60: ffields(apool) {
61: }
62:
63: private:
64:
1.18 ! paf 65: VStateless_class& fclass_real;
1.1 paf 66: Hash ffields;
67: };
68:
69: #endif
E-mail: