--- parser3/src/main/execute.C 2001/02/22 13:58:43 1.19 +++ parser3/src/main/execute.C 2001/02/22 15:39:23 1.21 @@ -1,5 +1,5 @@ /* - $Id: execute.C,v 1.19 2001/02/22 13:58:43 paf Exp $ + $Id: execute.C,v 1.21 2001/02/22 15:39:23 paf Exp $ */ #include "pa_array.h" @@ -72,6 +72,16 @@ void Request::execute(Array& ops) { stack.push(rcontext); break; } + case OP_WITH_ROOT: + { + stack.push(root); + break; + } + case OP_WITH_SELF: + { + stack.push(self); + break; + } case OP_STRING: { @@ -138,5 +148,8 @@ Value *Request::get_element() { Value *ncontext=static_cast(stack.pop()); Value *value=ncontext->get_element(*name); // name áûâàåò method, òîãäà âûäà¸ò new junction(ÀÂÒÎÂÛ×ÈÑËßÒÜ=false, root,self,rcontext,wcontext,code) // name áûâàåò èìÿ junction, òîãäà èëè îñòàâëÿåò â ïîêîå, èëè âû÷èñëÿåò â çàâèñèìîñòè îò ôëàãà ÀÂÒÎÂÛ×ÈÑËßÒÜ + + if(!value) + value=NEW VString(pool()); return value; } \ No newline at end of file