Return to pa_vclass.h CVS log

Up to [parser3project] / parser3 / src / types

Annotation of parser3/src/types/pa_vclass.h, revision 1.19

1.13      paf         1: /**    @file
1.14      paf         2:        Parser: @b class parser class decl.
1.13      paf         3: 
1.1       paf         4:        Copyright (c) 2001 ArtLebedev Group (http://www.artlebedev.com)
1.2       paf         5:        Author: Alexander Petrosyan <paf@design.ru> (http://design.ru/paf)
1.1       paf         6: 
1.19    ! parser      7:        $Id: pa_vclass.h,v 1.18 2001/09/24 15:09:23 parser Exp $
1.1       paf         8: */
                      9: 
                     10: #ifndef PA_VCLASS_H
                     11: #define PA_VCLASS_H
                     12: 
1.8       paf        13: #include "pa_vstateless_class.h"
1.18      parser     14: //#include "pa_vhash.h"
1.1       paf        15: #include "pa_vjunction.h"
                     16: 
1.13      paf        17: /**    stores 
                     18:        - base: VClass::base()
1.16      paf        19:        - static fields: VClass::ffields
1.13      paf        20: */
1.8       paf        21: class VClass : public VStateless_class {
1.1       paf        22: public: // Value
                     23:        
                     24:        const char *type() const { return "class"; }
1.9       paf        25: 
1.16      paf        26:        // VClass: (field)=STATIC value;(method)=method_ref with self=object_class
1.8       paf        27:        Value *get_element(const String& aname) {
1.16      paf        28:                // $field=static field
                     29:                if(Value *result=get_field(aname))
1.8       paf        30:                        return result;
1.16      paf        31:                
1.17      parser     32:                // $CLASS,$method
1.16      paf        33:                return VStateless_class::get_element(aname);
1.8       paf        34:        }
1.1       paf        35: 
1.16      paf        36:        // VClass: (field)=value - static values only
1.11      paf        37:        void put_element(const String& name, Value *value) {
                     38:                set_field(name, value);
                     39:        }
1.1       paf        40: 
                     41: public: // usage
                     42: 
1.8       paf        43:        VClass(Pool& apool) : VStateless_class(apool), 
                     44:                ffields(apool) {
1.1       paf        45:        }
                     46: 
1.12      paf        47: private:
                     48: 
1.1       paf        49:        void set_field(const String& name, Value *value) {
1.12      paf        50:                //if(value) // used in ^process to temporarily remove @main
                     51:                        //value->set_name(name);
1.1       paf        52:                if(fbase && fbase->replace_field(name, value))
                     53:                        return;
                     54: 
                     55:                ffields.put(name, value);
                     56:        }
                     57: 
                     58:        Value *get_field(const String& name) {
                     59:                Value *result=static_cast<Value *>(ffields.get(name));
                     60:                if(!result && fbase)
                     61:                        result=fbase->get_field(name);
                     62:                return result;
                     63:        }
1.8       paf        64: 
                     65: protected:
1.1       paf        66:                
                     67:        bool replace_field(const String& name, Value *value) {
                     68:                return 
                     69:                        (fbase && fbase->replace_field(name, value)) ||
                     70:                        ffields.put_replace(name, value);
                     71:        }
1.4       paf        72: 
1.1       paf        73: private:
                     74: 
                     75:        Hash ffields;
                     76: };
                     77: 
                     78: #endif