--- parser3/src/main/execute.C	2023/11/17 19:12:34	1.417
+++ parser3/src/main/execute.C	2024/09/07 16:30:26	1.419
@@ -21,7 +21,7 @@
 #include "pa_vimage.h"
 #include "pa_wwrapper.h"
 
-volatile const char * IDENT_EXECUTE_C="$Id: execute.C,v 1.417 2023/11/17 19:12:34 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.419 2024/09/07 16:30:26 moko Exp $" IDENT_PA_OPCODE_H IDENT_PA_OPERATION_H IDENT_PA_VCODE_FRAME_H IDENT_PA_WWRAPPER_H;
 
 //#define DEBUG_EXECUTE
 
@@ -128,8 +128,7 @@ void debug_printf(SAPI_Info& sapi_info,
 }
 
 void debug_dump(SAPI_Info& sapi_info, int level, ArrayOperation& ops) {
-	Array_iterator<Operation> i(ops);
-	while(i.has_next()) {
+	for(Array_iterator<Operation> i(ops); i;) {
 		OP::OPCODE opcode=i.next().code;
 
 #if defined(OPTIMIZE_BYTECODE_GET_OBJECT_ELEMENT) || defined(OPTIMIZE_BYTECODE_GET_OBJECT_VAR_ELEMENT)
@@ -245,7 +244,7 @@ void debug_dump(SAPI_Info& sapi_info, in
 // Request
 
 void Request::execute(ArrayOperation& ops) {
-	register Stack<StackItem>& stack=this->stack; // helps a lot on MSVC: 'esi'
+	Stack<StackItem>& stack=this->stack; // helps a lot on MSVC: 'esi'
 
 	const String* debug_name=0;  Operation::Origin debug_origin={0, 0, 0};
 	try{
@@ -254,7 +253,7 @@ void Request::execute(ArrayOperation& op
 	debug_dump(sapi_info, 0, ops);
 	debug_printf(sapi_info, "execution-------------------------\n");
 #endif
-	for(Array_iterator<Operation> i(ops); i.has_next(); ) {
+	for(Array_iterator<Operation> i(ops); i; ) {
 		OP::OPCODE opcode=i.next().code;
 
 #ifdef DEBUG_EXECUTE
@@ -1496,8 +1495,7 @@ const Operation::Origin Request::get_met
 
 	if(ArrayOperation* code=method->parser_code)
 		if(code){
-			Array_iterator<Operation> i(*code);
-			while( i.has_next() ){
+			for(Array_iterator<Operation> i(*code); i; ){
 				switch( i.next().code ){
 					case OP::OP_CURLY_CODE__STORE_PARAM: 
 					case OP::OP_EXPR_CODE__STORE_PARAM: