Annotation of parser3/src/types/pa_vhash.h, revision 1.19
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.19 ! parser 7: $Id: pa_vhash.h,v 1.16.4.4 2001/09/20 07:47:50 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.1 paf 31:
1.11 paf 32: /// VHash: fhash
1.8 paf 33: Hash *get_hash() { return &fhash; }
1.14 paf 34:
35: /// VHash: 0
36: VStateless_class *get_class() { return 0; }
1.7 paf 37:
1.11 paf 38: /// VHash: (key)=value
1.1 paf 39: Value *get_element(const String& name) {
1.15 parser 40: // $CLASS,$method
1.13 paf 41: if(Value *result=VStateless_class::get_element(name))
42: return result;
43:
44: // $element
1.16 parser 45: if(Value *result=static_cast<Value *>(fhash.get(name)))
46: return result;
47:
48: // default value
49: return static_cast<Value *>(fhash.get(*hash_default_element_name));
1.1 paf 50: }
51:
1.11 paf 52: /// VHash: (key)=value
1.1 paf 53: void put_element(const String& name, Value *value) {
1.5 paf 54: fhash.put(name, value);
1.1 paf 55: }
56:
57: public: // usage
58:
1.13 paf 59: VHash(Pool& apool) : VStateless_class(apool, hash_base_class),
60: fhash(apool),
1.18 parser 61: fdefault(0) {
62: }
63:
64: VHash(Pool& apool, const Hash& source) : VStateless_class(apool, hash_base_class),
65: fhash(source),
1.13 paf 66: fdefault(0) {
67: }
1.7 paf 68:
69: Hash& hash() { return fhash; }
1.1 paf 70:
1.13 paf 71: void set_default(Value& adefault) { fdefault=&adefault; }
72: Value *get_default() { return fdefault; }
73:
1.1 paf 74: private:
1.6 paf 75:
1.9 paf 76: Hash fhash;
1.13 paf 77: Value *fdefault;
1.6 paf 78:
1.1 paf 79: };
80:
81: #endif
E-mail: