Return to pa_venv.h CVS log

Up to [parser3project] / parser3 / src / types

Annotation of parser3/src/types/pa_venv.h, revision 1.11

1.10      paf         1: /** @file
                      2:        Parser: env class decl.
                      3: 
1.2       paf         4:        Copyright (c) 2001 ArtLebedev Group (http://www.artlebedev.com)
1.10      paf         5: 
1.2       paf         6:        Author: Alexander Petrosyan <paf@design.ru> (http://design.ru/paf)
                      7: 
1.11    ! paf         8:        $Id: pa_venv.h,v 1.10 2001/03/19 22:11:11 paf Exp $
1.2       paf         9: */
                     10: 
                     11: #ifndef PA_VENV_H
                     12: #define PA_VENV_H
                     13: 
1.8       paf        14: #include "pa_common.h"
1.10      paf        15: #include "pa_value.h"
1.3       paf        16: #include "pa_string.h"
1.2       paf        17: 
1.10      paf        18: /// env class
                     19: class VEnv : public Value {
1.2       paf        20: public: // Value
                     21:        
                     22:        // all: for error reporting after fail(), etc
                     23:        const char *type() const { return "env"; }
                     24: 
1.10      paf        25:        // VEnv: field
1.2       paf        26:        Value *get_element(const String& aname) {
1.5       paf        27:                // getenv
1.3       paf        28:                String& string=*NEW String(pool());
1.11    ! paf        29:                const char *val=(*service_funcs.get_env)(pool(), aname.cstr());
        !            30:                string.APPEND_TAINTED(val, 0, "environment", 0);
1.3       paf        31:                return NEW VString(string);
1.2       paf        32:        }
                     33: 
                     34: public: // usage
                     35: 
1.10      paf        36:        VEnv(Pool& apool) : Value(apool) {
1.2       paf        37:        }
                     38: 
                     39: };
                     40: 
                     41: #endif