Return to pa_vclass.C CVS log

Up to [parser3project] / parser3 / src / types

Annotation of parser3/src/types/pa_vclass.C, revision 1.5

1.1       paf         1: /*
                      2:        Parser
                      3:        Copyright (c) 2001 ArtLebedev Group (http://www.artlebedev.com)
1.2       paf         4:        Author: Alexander Petrosyan <paf@design.ru> (http://design.ru/paf)
1.1       paf         5: 
1.5     ! paf         6:        $Id: pa_vclass.C,v 1.4.8.1 2001/03/13 13:40:01 paf Exp $
1.1       paf         7: */
                      8: 
                      9: #include "pa_vclass.h"
                     10: #include "pa_vstring.h"
                     11: 
                     12: // object_class, operator_class: (field)=value - static values only
1.4       paf        13: void VClass::put_element(const String& aname, Value *avalue) {
1.5     ! paf        14:        if(read_only) // TODO:remove
1.4       paf        15:                THROW(0, 0,
1.5     ! paf        16:                &aname,
        !            17:                "can not put element into read-only '%s' class",
        !            18:                name().cstr());
1.4       paf        19:        
                     20:        set_field(aname, avalue);
1.1       paf        21: }