optimization - migrate from INVOKEINTERFACE to INVOKEVIRTUAL

Author: fglock

src/main/java/org/perlonjava/codegen/EmitOperator.java

@@ -410,9 +410,8 @@ public static void handleScalarContext(EmitterVisitor emitterVisitor, Node node)
             mv.visitMethodInsn(Opcodes.INVOKEVIRTUAL, className,
                     "scalar", "()" + RuntimeTypeConstants.SCALAR_TYPE, false);
         } else {
-            // For unknown types or any other RuntimeDataProvider implementations
-            mv.visitMethodInsn(Opcodes.INVOKEINTERFACE, RuntimeTypeConstants.DATA_PROVIDER_INTERFACE,
-                    "scalar", "()" + RuntimeTypeConstants.SCALAR_TYPE, true);
+            // For unknown types
+            mv.visitMethodInsn(Opcodes.INVOKEVIRTUAL, "org/perlonjava/runtime/RuntimeBaseEntity", "scalar", "()Lorg/perlonjava/runtime/RuntimeScalar;", false);
         }
     }
 

src/main/java/org/perlonjava/codegen/EmitRegex.java

@@ -196,7 +196,7 @@ private static void emitMatchRegex(EmitterVisitor emitterVisitor) {
         // Handle the result based on context type
         if (emitterVisitor.ctx.contextType == RuntimeContextType.SCALAR) {
             // Convert result to Scalar if in scalar context
-            emitterVisitor.ctx.mv.visitMethodInsn(Opcodes.INVOKEINTERFACE, "org/perlonjava/runtime/RuntimeDataProvider", "scalar", "()Lorg/perlonjava/runtime/RuntimeScalar;", true);
+            emitterVisitor.ctx.mv.visitMethodInsn(Opcodes.INVOKEVIRTUAL, "org/perlonjava/runtime/RuntimeBaseEntity", "scalar", "()Lorg/perlonjava/runtime/RuntimeScalar;", false);
         } else if (emitterVisitor.ctx.contextType == RuntimeContextType.VOID) {
             // Discard result if in void context
             emitterVisitor.ctx.mv.visitInsn(Opcodes.POP);

src/main/java/org/perlonjava/codegen/EmitVariable.java

@@ -133,7 +133,7 @@ static void handleVariableOperator(EmitterVisitor emitterVisitor, OperatorNode n
             }
             if (emitterVisitor.ctx.contextType == RuntimeContextType.SCALAR && !sigil.equals("$")) {
                 // scalar context: transform the value in the stack to scalar
-                mv.visitMethodInsn(Opcodes.INVOKEINTERFACE, "org/perlonjava/runtime/RuntimeDataProvider", "scalar", "()Lorg/perlonjava/runtime/RuntimeScalar;", true);
+                mv.visitMethodInsn(Opcodes.INVOKEVIRTUAL, "org/perlonjava/runtime/RuntimeBaseEntity", "scalar", "()Lorg/perlonjava/runtime/RuntimeScalar;", false);
             }
             emitterVisitor.ctx.logDebug("GETVAR end " + varIndex);
             return;
@@ -469,7 +469,7 @@ static void handleMyOperator(EmitterVisitor emitterVisitor, OperatorNode node) {
                     emitterVisitor.ctx.mv.visitVarInsn(Opcodes.ASTORE, varIndex);
                     if (emitterVisitor.ctx.contextType == RuntimeContextType.SCALAR && !sigil.equals("$")) {
                         // scalar context: transform the value in the stack to scalar
-                        emitterVisitor.ctx.mv.visitMethodInsn(Opcodes.INVOKEINTERFACE, "org/perlonjava/runtime/RuntimeDataProvider", "scalar", "()Lorg/perlonjava/runtime/RuntimeScalar;", true);
+                        emitterVisitor.ctx.mv.visitMethodInsn(Opcodes.INVOKEVIRTUAL, "org/perlonjava/runtime/RuntimeBaseEntity", "scalar", "()Lorg/perlonjava/runtime/RuntimeScalar;", false);
                     }
                     return;
                 }

src/main/java/org/perlonjava/operators/OperatorHandler.java

@@ -190,24 +190,24 @@ public class OperatorHandler {
                 "(Lorg/perlonjava/runtime/RuntimeList;Lorg/perlonjava/runtime/RuntimeScalar;I)Lorg/perlonjava/runtime/RuntimeList;");
 
         operatorHandlers.put("scalar",
-                new OperatorHandler("org/perlonjava/runtime/RuntimeDataProvider",
+                new OperatorHandler("org/perlonjava/runtime/RuntimeBaseEntity",
                         "scalar",
-                        Opcodes.INVOKEINTERFACE,
+                        Opcodes.INVOKEVIRTUAL,
                         "()Lorg/perlonjava/runtime/RuntimeScalar;"));
         operatorHandlers.put("each",
-                new OperatorHandler("org/perlonjava/runtime/RuntimeDataProvider",
+                new OperatorHandler("org/perlonjava/runtime/RuntimeBaseEntity",
                         "each",
-                        Opcodes.INVOKEINTERFACE,
+                        Opcodes.INVOKEVIRTUAL,
                         "()Lorg/perlonjava/runtime/RuntimeList;"));
         operatorHandlers.put("keys",
-                new OperatorHandler("org/perlonjava/runtime/RuntimeDataProvider",
+                new OperatorHandler("org/perlonjava/runtime/RuntimeBaseEntity",
                         "keys",
-                        Opcodes.INVOKEINTERFACE,
+                        Opcodes.INVOKEVIRTUAL,
                         "()Lorg/perlonjava/runtime/RuntimeArray;"));
         operatorHandlers.put("values",
-                new OperatorHandler("org/perlonjava/runtime/RuntimeDataProvider",
+                new OperatorHandler("org/perlonjava/runtime/RuntimeBaseEntity",
                         "values",
-                        Opcodes.INVOKEINTERFACE,
+                        Opcodes.INVOKEVIRTUAL,
                         "()Lorg/perlonjava/runtime/RuntimeArray;"));