Annotation of parser3/src/types/pa_vhash.h, revision 1.20
1.10 paf 1: /** @file
2: Parser: @b hash parser type decl.
3:
1.1 paf 4: Copyright (c) 2001 ArtLebedev Group (http://www.artlebedev.com)
1.3 paf 5: Author: Alexander Petrosyan <paf@design.ru> (http://design.ru/paf)
1.1 paf 6:
1.20 ! parser 7: $Id: pa_vhash.h,v 1.19 2001/09/24 14:34:25 parser Exp $
1.1 paf 8: */
9:
10: #ifndef PA_VHASH_H
11: #define PA_VHASH_H
12:
1.13 paf 13: #include "classes.h"
1.1 paf 14: #include "pa_value.h"
15: #include "pa_hash.h"
16:
1.13 paf 17: extern Methoded *hash_base_class;
18:
1.11 paf 19: /// value of type 'hash', implemented with Hash
1.13 paf 20: class VHash : public VStateless_class {
1.1 paf 21: public: // value
22:
1.2 paf 23: const char *type() const { return "hash"; }
1.17 parser 24:
1.19 parser 25: /// VHash: finteger
26: int as_int() const { return fhash.size(); }
27: /// VHash: finteger
28: double as_double() const { return as_int(); }
1.17 parser 29: /// VHash: count!=0
1.19 parser 30: bool is_defined() const { return as_int()!=0; }
1.20 ! parser 31: /// VHash: count
! 32: Value *as_expr_result(bool return_string_as_is=false) { return NEW VInt(pool(), as_int()); }
1.1 paf 33:
1.11 paf 34: /// VHash: fhash
1.8 paf 35: Hash *get_hash() { return &fhash; }
1.14 paf 36:
37: /// VHash: 0
38: VStateless_class *get_class() { return 0; }
1.7 paf 39:
1.11 paf 40: /// VHash: (key)=value
1.1 paf 41: Value *get_element(const String& name) {
1.15 parser 42: // $CLASS,$method
1.13 paf 43: if(Value *result=VStateless_class::get_element(name))
44: return result;
45:
46: // $element
1.16 parser 47: if(Value *result=static_cast<Value *>(fhash.get(name)))
48: return result;
49:
50: // default value
51: return static_cast<Value *>(fhash.get(*hash_default_element_name));
1.1 paf 52: }
53:
1.11 paf 54: /// VHash: (key)=value
1.1 paf 55: void put_element(const String& name, Value *value) {
1.5 paf 56: fhash.put(name, value);
1.1 paf 57: }
58:
59: public: // usage
60:
1.13 paf 61: VHash(Pool& apool) : VStateless_class(apool, hash_base_class),
62: fhash(apool),
1.18 parser 63: fdefault(0) {
64: }
65:
66: VHash(Pool& apool, const Hash& source) : VStateless_class(apool, hash_base_class),
67: fhash(source),
1.13 paf 68: fdefault(0) {
69: }
1.7 paf 70:
71: Hash& hash() { return fhash; }
1.1 paf 72:
1.13 paf 73: void set_default(Value& adefault) { fdefault=&adefault; }
74: Value *get_default() { return fdefault; }
75:
1.1 paf 76: private:
1.6 paf 77:
1.9 paf 78: Hash fhash;
1.13 paf 79: Value *fdefault;
1.6 paf 80:
1.1 paf 81: };
82:
83: #endif
E-mail: