[svn:parrot] r41671 - branches/pcc_reapply/config/gen

[bacek at svn.parrot.org]

Author: bacek
Date: Sun Oct  4 03:02:04 2009
New Revision: 41671
URL: https://trac.parrot.org/parrot/changeset/41671

Log:
Replace runops..._event with invoke_sub in glut callbacks.

Modified:
   branches/pcc_reapply/config/gen/opengl.pm

Modified: branches/pcc_reapply/config/gen/opengl.pm
==============================================================================
--- branches/pcc_reapply/config/gen/opengl.pm	Sun Oct  4 02:09:53 2009	(r41670)
+++ branches/pcc_reapply/config/gen/opengl.pm	Sun Oct  4 03:02:04 2009	(r41671)
@@ -1064,7 +1064,7 @@
     PMC           *sub   = callback_data[GLUT_CB_TIMER].sub;
 
     if (is_safe(interp, sub))
-        Parrot_runops_fromc_args_event(interp, sub, "vi", data);
+        Parrot_pcc_invoke_sub_from_c_args(interp, sub, "vi", data);
 }
 
 PARROT_DYNEXT_EXPORT
@@ -1099,7 +1099,7 @@
     PMC           *sub   = callback_data[GLUT_CB_JOYSTICK].sub;
 
     if (is_safe(interp, sub))
-        Parrot_runops_fromc_args_event(interp, sub, "viiii", buttons, xaxis, yaxis, zaxis);
+        Parrot_pcc_invoke_sub_from_c_args(interp, sub, "viiii", buttons, xaxis, yaxis, zaxis);
 }
 
 PARROT_DYNEXT_EXPORT
@@ -1139,7 +1139,7 @@
     PMC           *sub   = callback_data[$_->{enum}].sub;
 
     if (is_safe(interp, sub))
-        Parrot_runops_fromc_args_event(interp, sub, "$_->{sig}"$_->{args});
+        Parrot_pcc_invoke_sub_from_c_args(interp, sub, "$_->{sig}"$_->{args});
 }
 
 PARROT_DYNEXT_EXPORT