--- parser3/src/include/pa_opcode.h	2015/03/16 09:47:34	1.48
+++ parser3/src/include/pa_opcode.h	2026/04/25 13:38:46	1.60
@@ -1,9 +1,9 @@
 /** @file
 	Parser: compiled code related decls.
 
-	Copyright (c) 2001-2012 Art. Lebedev Studio (http://www.artlebedev.com)
+	Copyright (c) 2001-2026 Art. Lebedev Studio (https://www.artlebedev.com)
 
-	Author: Alexandr Petrosian <paf@design.ru> (http://paf.design.ru)
+	Authors: Konstantin Morshnev <moko@design.ru>, Alexandr Petrosian <paf@design.ru>
 */
 
 #ifndef OPCODE_H
@@ -11,7 +11,7 @@
 
 namespace OP {
 
-#define IDENT_PA_OPCODE_H "$Id: pa_opcode.h,v 1.48 2015/03/16 09:47:34 misha Exp $"
+#define IDENT_PA_OPCODE_H "$Id: pa_opcode.h,v 1.60 2026/04/25 13:38:46 moko Exp $"
 
 #define OPTIMIZE_BYTECODE_GET_ELEMENT                // $a ^a
 #define OPTIMIZE_BYTECODE_GET_OBJECT_ELEMENT         // $a.b ^a.b
@@ -20,7 +20,6 @@ namespace OP {
 #define OPTIMIZE_BYTECODE_OBJECT_POOL                // $var[$a.b], $var[$a.$b]
 #define OPTIMIZE_BYTECODE_CUT_REM_OPERATOR           // cut rem with all params
 
-
 #ifdef OPTIMIZE_BYTECODE_GET_ELEMENT
 #define OPTIMIZE_BYTECODE_CONSTRUCT                  // $a(expr),  $a[value]
 #endif                                               // $.a(expr), $.a[value]
@@ -29,6 +28,8 @@ namespace OP {
 #define OPTIMIZE_BYTECODE_GET_SELF_ELEMENT           // $self.a ^self.a
 #define OPTIMIZE_BYTECODE_GET_ELEMENT__SPECIAL       // .CLASS, .CLASS_NAME
 
+#define FEATURE_GET_ELEMENT4CALL                     // ^o.m[] calls get_element4call("m"), not get_element("m")
+
 ///	Compiled operation code
 enum OPCODE {
 	//@{ 
@@ -40,8 +41,8 @@ enum OPCODE {
 	//@{
 	/// @name actions
 	OP_WITH_ROOT,	OP_WITH_SELF,	OP_WITH_READ,	OP_WITH_WRITE,
-	OP_VALUE__GET_CLASS,
-	OP_CONSTRUCT_VALUE, OP_CONSTRUCT_EXPR, OP_CURLY_CODE__CONSTRUCT,
+	OP_VALUE__GET_CLASS, OP_VALUE__GET_BASE_CLASS,
+	OP_CONSTRUCT_VALUE, OP_CONSTRUCT_EXPR, OP_CURLY_CODE__CONSTRUCT, OP_CONSTRUCT_ARRAY,
 	OP_WRITE_VALUE,	OP_WRITE_EXPR_RESULT,	OP_STRING__WRITE,
 #ifdef OPTIMIZE_BYTECODE_GET_ELEMENT
 	OP_VALUE__GET_ELEMENT_OR_OPERATOR,
@@ -56,22 +57,32 @@ enum OPCODE {
 	OP_WITH_ROOT__VALUE__GET_ELEMENT,
 #endif
 #ifdef OPTIMIZE_BYTECODE_GET_OBJECT_ELEMENT
-	OP_GET_OBJECT_ELEMENT,				// $a.b & ^a.b
+	OP_GET_OBJECT_ELEMENT,			// $a.b & ^a.b
 	OP_GET_OBJECT_ELEMENT__WRITE,		// $a.b & ^a.b
 #endif
 #ifdef OPTIMIZE_BYTECODE_GET_OBJECT_VAR_ELEMENT
-	OP_GET_OBJECT_VAR_ELEMENT,			// $a.$b & ^a.$b
+	OP_GET_OBJECT_VAR_ELEMENT,		// $a.$b & ^a.$b
 	OP_GET_OBJECT_VAR_ELEMENT__WRITE,	// $a.$b & ^a.$b
 #endif
 #ifdef OPTIMIZE_BYTECODE_GET_SELF_ELEMENT
 	OP_WITH_SELF__VALUE__GET_ELEMENT,
 	OP_WITH_SELF__VALUE__GET_ELEMENT__WRITE,
 #endif
+
+#ifdef FEATURE_GET_ELEMENT4CALL
+	OP_GET_ELEMENT4CALL,
+#ifdef OPTIMIZE_BYTECODE_GET_OBJECT_ELEMENT
+	OP_GET_OBJECT_ELEMENT4CALL,
+#endif
+#ifdef OPTIMIZE_BYTECODE_GET_OBJECT_VAR_ELEMENT
+	OP_GET_OBJECT_VAR_ELEMENT4CALL,
+#endif
+#endif // FEATURE_GET_ELEMENT4CALL
+
 	OP_OBJECT_POOL,	OP_STRING_POOL,
 	OP_PREPARE_TO_CONSTRUCT_OBJECT,
 	OP_CONSTRUCT_OBJECT,
 	OP_CONSTRUCT_OBJECT__WRITE,
-	OP_PREPARE_TO_EXPRESSION, 
 	OP_CALL, OP_CALL__WRITE,
 
 #ifdef OPTIMIZE_BYTECODE_CONSTRUCT
@@ -103,6 +114,6 @@ enum OPCODE {
 	OP_IS
 	//@}
 };
-};
+}
 
 #endif