[svn:parrot] r42497 - trunk/config/gen

japhb at svn.parrot.org japhb at svn.parrot.org
Sat Nov 14 01:13:29 UTC 2009


Author: japhb
Date: Sat Nov 14 01:13:29 2009
New Revision: 42497
URL: https://trac.parrot.org/parrot/changeset/42497

Log:
[OpenGL] glut_callbacks.c: Now with Parrot_ext_call()

Modified:
   trunk/config/gen/opengl.pm

Modified: trunk/config/gen/opengl.pm
==============================================================================
--- trunk/config/gen/opengl.pm	Sat Nov 14 01:00:14 2009	(r42496)
+++ trunk/config/gen/opengl.pm	Sat Nov 14 01:13:29 2009	(r42497)
@@ -1082,7 +1082,7 @@
     PMC           *sub   = callback_data[GLUT_CB_TIMER].sub;
 
     if (is_safe(interp, sub))
-        Parrot_pcc_invoke_sub_from_c_args(interp, sub, "I->", data);
+        Parrot_ext_call(interp, sub, "I->", data);
 }
 
 PARROT_DYNEXT_EXPORT
@@ -1117,7 +1117,7 @@
     PMC           *sub   = callback_data[GLUT_CB_JOYSTICK].sub;
 
     if (is_safe(interp, sub))
-        Parrot_pcc_invoke_sub_from_c_args(interp, sub, "IIII->", buttons, xaxis, yaxis, zaxis);
+        Parrot_ext_call(interp, sub, "IIII->", buttons, xaxis, yaxis, zaxis);
 }
 
 PARROT_DYNEXT_EXPORT
@@ -1157,7 +1157,7 @@
     PMC           *sub   = callback_data[$_->{enum}].sub;
 
     if (is_safe(interp, sub))
-        Parrot_pcc_invoke_sub_from_c_args(interp, sub, "$_->{sig}"$_->{args});
+        Parrot_ext_call(interp, sub, "$_->{sig}"$_->{args});
 }
 
 PARROT_DYNEXT_EXPORT


More information about the parrot-commits mailing list