--- parser3/src/main/execute.C	2026/04/25 13:38:46	1.430
+++ parser3/src/main/execute.C	2026/10/18 21:05:35	1.433
@@ -22,7 +22,7 @@
 #include "pa_varray.h"
 #include "pa_wwrapper.h"
 
-volatile const char * IDENT_EXECUTE_C="$Id: execute.C,v 1.430 2026/04/25 13:38:46 moko Exp $" IDENT_PA_OPCODE_H IDENT_PA_OPERATION_H IDENT_PA_VCODE_FRAME_H IDENT_PA_WWRAPPER_H;
+volatile const char * IDENT_EXECUTE_C="$Id: execute.C,v 1.433 2026/10/18 21:05:35 moko Exp $" IDENT_PA_OPCODE_H IDENT_PA_OPERATION_H IDENT_PA_VCODE_FRAME_H IDENT_PA_WWRAPPER_H;
 
 //#define DEBUG_EXECUTE
 
@@ -117,7 +117,7 @@ const char* debug_value_to_cstr(Value& v
 
 void va_debug_printf(SAPI_Info& sapi_info, const char* fmt,va_list args) {
 	char buf[MAX_STRING];
-	vsnprintf(buf, MAX_STRING, fmt, args);
+	pa_vsnprintf(buf, MAX_STRING, fmt, args);
 	SAPI::log(sapi_info, "%s", buf);
 }
 
@@ -246,6 +246,7 @@ void debug_dump(SAPI_Info& sapi_info, in
 // Request
 
 void Request::execute(ArrayOperation& ops) {
+	SINGLE_METHOD_FRAME_STORAGE; // one frame at a time, see SINGLE_METHOD_FRAME
 	Stack<StackItem>& stack=this->stack; // helps a lot on MSVC: 'esi'
 
 	const String* debug_name=0;  Operation::Origin debug_origin={0, 0, 0};
@@ -790,7 +791,7 @@ void Request::execute(ArrayOperation& op
 
 				Value *result;
 				{
-					EXPRESSION_FRAME_ACTION(*junction->method, method_frame, junction->self, {
+					SINGLE_EXPRESSION_FRAME_ACTION(*junction->method, method_frame, junction->self, {
 						METHOD_PARAMS_ACTION(call(frame));
 						result=&frame.result();
 						// desctructor deletes junctions in stack params here
@@ -840,13 +841,13 @@ void Request::execute(ArrayOperation& op
 						method.native_code(*this, method_params); // execute it
 					}
 				} else if(method.call_optimization==Method::CO_WITHOUT_WCONTEXT){
-					METHOD_FRAME_ACTION(method, method_frame, junction->self, {
+					SINGLE_METHOD_FRAME_ACTION(method, method_frame, junction->self, {
 						METHOD_PARAMS_ACTION(call_write(frame))
 					});
 				} else 
 #endif // OPTIMIZE_CALL
 				{
-					METHOD_FRAME_ACTION(method, method_frame, junction->self, {
+					SINGLE_METHOD_FRAME_ACTION(method, method_frame, junction->self, {
 						METHOD_PARAMS_ACTION(call(frame));
 						write(frame.result());
 					});
@@ -885,7 +886,7 @@ void Request::execute(ArrayOperation& op
 				Value *result;
 				{
 					Value& object=construct(vclass, *constructor_junction->method);
-					CONSTRUCTOR_FRAME_ACTION(*constructor_junction->method, method_frame, object, {
+					SINGLE_CONSTRUCTOR_FRAME_ACTION(*constructor_junction->method, method_frame, object, {
 						METHOD_PARAMS_ACTION(call(frame));
 						object.enable_default_setter();
 						result=&frame.result();
@@ -942,14 +943,16 @@ void Request::execute(ArrayOperation& op
 		case OP::OP_FEXISTS:
 			{
 				Value& a=stack.pop().value();
-				Value& value=VBool::get(file_exist(full_disk_path(a.as_string())));
+				const String* path=real_disk_path(a.as_string());
+				Value& value=VBool::get(path && file_exist(*path));
 				stack.push(value);
 				break;
 			}
 		case OP::OP_DEXISTS:
 			{
 				Value& a=stack.pop().value();
-				Value& value=VBool::get(dir_exists(full_disk_path(a.as_string())));
+				const String* path=real_disk_path(a.as_string());
+				Value& value=VBool::get(path && dir_exists(*path));
 				stack.push(value);
 				break;
 			}