JavaArray.st
branchperformance-optimizations
changeset 2597 24475baf6abc
parent 2596 957f4aa699bb
child 2965 bac7022ca26a
--- a/JavaArray.st	Wed May 15 02:07:18 2013 +0100
+++ b/JavaArray.st	Fri May 17 14:14:55 2013 +0100
@@ -325,16 +325,10 @@
 _CHECKCAST: cls
     JavaVM _CHECKCAST: self _: cls.
 %{
-    OBJ objCls = __Class(self);
-    if ( ( __ILC_FLAGS(__pilc) & 0x0F) != I_PERF )  {
-        if ( __qSpace(objCls) < NEWSPACE ) {   
-            void ___ilcBindPrimitive();            
-            /* printf("CHECKCAST: __pilc == 0x%x\n", __pilc); */
-            OBJ ___checkcast_f();
-            __ilcBindPrimitive(__pilc, objCls, &___checkcast_f, 2, __selector);
-        }
-    }
-%}.  
+    void ___checkcast_bind();
+    ___checkcast_bind(__pilc, __Class(self));
+
+%}.    
     ^self  
 
     "Created: / 14-05-2013 / 10:09:11 / Jan Vrany <jan.vrany@fit.cvut.cz>"
@@ -345,21 +339,9 @@
     
     r := JavaVM _INSTANCEOF: self _: cls.
 %{
-    OBJ objCls = __Class(self);
-    OBJ ___instanceof_f0();
-    OBJ ___instanceof_f1();
-    OBJFUNC f;
-
-    f = (r == __MKSMALLINT(0)) ? &___instanceof_f0 : &___instanceof_f1;
+    void ___instanceof_bind();
+    ___instanceof_bind(__pilc, __Class(self), r);
 
-    if ( ( __ILC_FLAGS(__pilc) & 0x0F) != I_PERF )  {
-        if ( __qSpace(objCls) < NEWSPACE ) {   
-            void ___ilcBindPrimitive();            
-            /* printf("CHECKCAST: __pilc == 0x%x\n", __pilc); */
-            OBJ ___checkcast_f();
-            __ilcBindPrimitive(__pilc, objCls, f, 1, __selector);
-        }
-    }
 %}. 
     ^r