# New Ticket Created by Stephane Peiry
# Please include the string: [perl #31720]
# in the subject line of all future correspondence about this issue.
# <URL: http://rt.perl.org:80/rt3/Ticket/Display.html?id=31720 >
The solaris port does not yet support jitted vtables (for instance function
Parrot_jit_vtable1_op is plain empty at the moment), so this patch comments
out the whole "jit vatbles" block until we get it properly implemented.
This fixes make testj on
t/op/gc (failing, passes ok now)
t/op/lexicals.t (this was hanging undefintly, now passes ok)
and also regain visibility on the jit tests, without having to manually
bypass lexicals.
Thanks,
Stephane
Index: jit/sun4/jit_emit.h
===================================================================
RCS file: /cvs/public/parrot/jit/sun4/jit_emit.h,v
retrieving revision 1.27
diff -u -r1.27 jit_emit.h
--- jit/sun4/jit_emit.h 23 Apr 2004 09:20:56 -0000 1.27
+++ jit/sun4/jit_emit.h 23 Sep 2004 18:39:36 -0000
@@ -734,9 +734,9 @@
}
# ifndef NO_JIT_VTABLE_OPS
-
+/*
# undef Parrot_jit_vtable1_op
-/*# undef Parrot_jit_vtable1r_op
+# undef Parrot_jit_vtable1r_op
# undef Parrot_jit_vtable2rk_op
# undef Parrot_jit_vtable3k_op
@@ -752,14 +752,14 @@
# undef Parrot_jit_vtable_ifp_op
# undef Parrot_jit_vtable_unlessp_op
# undef Parrot_jit_vtable_newp_ic_op
-*/
+
static void
Parrot_jit_vtable1_op(Parrot_jit_info_t *jit_info,
Interp *interpreter)
{
}
-
+*/
#endif /* NO_JIT_VTABLE_OPS */
#else
