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

petdance at svn.parrot.org petdance at svn.parrot.org
Sat Jul 18 17:36:34 UTC 2009


Author: petdance
Date: Sat Jul 18 17:36:32 2009
New Revision: 40145
URL: https://trac.parrot.org/parrot/changeset/40145

Log:
use PMC_IS_NULL instead of matching to PMCNULL

Modified:
   trunk/config/gen/opengl.pm

Modified: trunk/config/gen/opengl.pm
==============================================================================
--- trunk/config/gen/opengl.pm	Sat Jul 18 16:31:40 2009	(r40144)
+++ trunk/config/gen/opengl.pm	Sat Jul 18 17:36:32 2009	(r40145)
@@ -1074,7 +1074,7 @@
     callback_data[GLUT_CB_TIMER].interp = interp;
     callback_data[GLUT_CB_TIMER].sub    = sub;
 
-    if (sub == PMCNULL)
+    if (PMC_IS_NULL(sub))
         glutTimerFunc(0, NULL, 0);
     else
         glutTimerFunc(milliseconds, glut_timer_func, data);
@@ -1109,7 +1109,7 @@
     callback_data[GLUT_CB_JOYSTICK].interp = interp;
     callback_data[GLUT_CB_JOYSTICK].sub    = sub;
 
-    if (sub == PMCNULL)
+    if (PMC_IS_NULL(sub))
         glutJoystickFunc(NULL, 0);
     else
         glutJoystickFunc(glut_joystick_func, pollinterval);
@@ -1149,7 +1149,7 @@
     callback_data[$_->{enum}].interp = interp;
     callback_data[$_->{enum}].sub    = sub;
 
-    if (sub == PMCNULL)
+    if (PMC_IS_NULL(sub))
         $_->{glut}(NULL);
     else
         $_->{glut}($_->{thunk});


More information about the parrot-commits mailing list