Annotation of parser3/src/types/pa_vtable.h, revision 1.37
1.6 paf 1: /** @file
1.15 paf 2: Parser: @b table parser class decl.
1.6 paf 3:
1.36 paf 4: Copyright (c) 2001, 2002 ArtLebedev Group (http://www.artlebedev.com)
1.37 ! paf 5: Author: Alexandr Petrosian <paf@design.ru> (http://paf.design.ru)
1.1 paf 6:
1.37 ! paf 7: $Id: pa_vtable.h,v 1.36 2002/02/08 07:27:55 paf Exp $
1.1 paf 8: */
9:
10: #ifndef PA_VTABLE_H
11: #define PA_VTABLE_H
12:
13: #include "pa_vstateless_object.h"
14: #include "pa_table.h"
1.26 parser 15: #include "pa_vvoid.h"
1.30 parser 16: #include "pa_vint.h"
1.1 paf 17:
1.27 parser 18: #define TABLE_FIELDS_ELEMENT_NAME "fields"
19:
1.16 paf 20: extern Methoded *table_class;
21:
1.6 paf 22: /// value of type 'table'. implemented with Table
1.1 paf 23: class VTable : public VStateless_object {
24: public: // Value
25:
26: const char *type() const { return "table"; }
1.32 parser 27: /// VTable: count
1.31 parser 28: int as_int() const { return table().size(); }
1.32 parser 29: /// VTable: count
1.31 parser 30: double as_double() const { return as_int(); }
1.29 parser 31: /// VTable: count!=0
1.31 parser 32: bool is_defined() const { return as_int()!=0; }
33: /// VTable: 0 or !0
1.34 parser 34: bool as_bool() const { return is_defined(); }
1.32 parser 35: /// VTable: count
36: Value *as_expr_result(bool return_string_as_is=false) { return NEW VInt(pool(), as_int()); }
1.6 paf 37: /// extract VTable
1.10 paf 38: Table *get_table() { return ftable; }
1.18 paf 39: /// VTable: columns,methods
1.27 parser 40: Value *get_element(const String& name);
1.7 paf 41:
42: protected: // VAliased
43:
1.9 paf 44: /// disable .CLASS element. @see VAliased::get_element
1.13 paf 45: bool hide_class() { return true; }
1.1 paf 46:
47: public: // usage
48:
1.12 paf 49: VTable(Pool& apool, Table* atable=0) : VStateless_object(apool, *table_class),
1.28 parser 50: ftable(atable) {
1.1 paf 51: }
1.14 paf 52: void set_table(Table& avalue) {
53: ftable=&avalue;
54: }
1.30 parser 55: Table& table() const {
1.4 paf 56: if(!ftable)
1.1 paf 57: bark("getting unset vtable value");
58:
1.4 paf 59: return *ftable;
1.1 paf 60: }
61:
62: private:
1.27 parser 63:
64: Value *fields_element();
1.1 paf 65:
1.18 paf 66: private:
67:
68: Table *ftable;
1.1 paf 69:
70: };
71:
72: #endif
E-mail: