Return to pa_vjunction.C CVS log

Up to [parser3project] / parser3 / src / types

Annotation of parser3/src/types/pa_vjunction.C, revision 1.10

1.1       paf         1: /**    @file
1.4       misha       2:        Parser: @b junction class decl.
1.1       paf         3: 
1.5       misha       4:        Copyright (c) 2001-2009 ArtLebedev Group (http://www.artlebedev.com)
1.1       paf         5:        Author: Alexandr Petrosian <paf@design.ru> (http://paf.design.ru)
                      6: */
                      7: 
1.10    ! misha       8: static const char * const IDENT_VJUNCTION_C="$Date: 2010-07-13 01:39:53 $";
1.4       misha       9: 
                     10: // include
1.2       paf        11: 
1.1       paf        12: #include "pa_vjunction.h"
1.4       misha      13: #include "pa_vbool.h"
1.6       misha      14: #include "pa_wcontext.h"
                     15: 
                     16: void VJunction::reattach(WContext *new_wcontext){
                     17:        if(new_wcontext) {
                     18:                assert(fjunction.wcontext!=new_wcontext);
                     19:                fjunction.wcontext=new_wcontext;
                     20:                fjunction.wcontext->attach_junction(this);
1.8       misha      21:        } else {
                     22:                fjunction.method_frame=0;
                     23:                fjunction.rcontext=0;
                     24:                fjunction.wcontext=0;
1.7       misha      25:        }
1.6       misha      26: }
                     27: 
1.1       paf        28: 
1.4       misha      29: override Value& VJunction::as_expr_result(bool) {
1.5       misha      30:        return VBool::get(as_bool());
1.1       paf        31: }
1.9       misha      32: 
                     33: 
                     34: Value* VJunction::get_element(const String& aname) {
                     35:        // .CLASS
                     36:        if(aname==CLASS_NAME)
                     37:                return this;
                     38:        // .CLASS_NAME
                     39:        if(aname==CLASS_NAMETEXT)
                     40:                return new VString(junction_class_name);
                     41:        return Value::get_element(aname);
1.10    ! misha      42: }