--- parser3/src/main/execute.C 2001/03/08 13:42:32 1.71 +++ parser3/src/main/execute.C 2001/03/08 15:15:46 1.73 @@ -1,5 +1,5 @@ /* - $Id: execute.C,v 1.71 2001/03/08 13:42:32 paf Exp $ + $Id: execute.C,v 1.73 2001/03/08 15:15:46 paf Exp $ */ #include "pa_array.h" @@ -92,7 +92,7 @@ void Request::execute(const Array& ops) for(int i=0; i(stack[stack.top()]); + VMethodFrame *frame=static_cast(stack.top_value()); // code const Array *local_ops=reinterpret_cast(ops.quick_get(++i)); fprintf(stderr, " (%d)\n", local_ops->size()); @@ -258,7 +258,7 @@ void Request::execute(const Array& ops) case OP_STORE_PARAM: { Value *value=POP(); - VMethodFrame *frame=static_cast(stack[0]); + VMethodFrame *frame=static_cast(stack.top_value()); frame->store_param(value); break; } @@ -544,7 +544,7 @@ Value *Request::get_element() { Value *value=ncontext->get_element(name); // autocalc possible code-junction - value=value?&autocalc(*value, true/*make_string*/):NEW VUnknown(pool()); + value=value?&autocalc(*value):NEW VUnknown(pool()); value->set_name(name); return value;