[svn:parrot] r38424 - trunk/runtime/parrot/library

[japhb at svn.parrot.org]

Author: japhb
Date: Fri May  1 17:22:46 2009
New Revision: 38424
URL: https://trac.parrot.org/parrot/changeset/38424

Log:
[OpenGL] Fix old '.const .Sub' syntax in OpenGL.pir POD

Modified:
   trunk/runtime/parrot/library/OpenGL.pir

Modified: trunk/runtime/parrot/library/OpenGL.pir
==============================================================================
--- trunk/runtime/parrot/library/OpenGL.pir	Fri May  1 17:21:11 2009	(r38423)
+++ trunk/runtime/parrot/library/OpenGL.pir	Fri May  1 17:22:46 2009	(r38424)
@@ -30,7 +30,7 @@
     .local pmc call_toolkit_init
     call_toolkit_init = get_global ['NCI'], 'call_toolkit_init'
 
-    .const .Sub glutInit = 'glutInit'
+    .const 'Sub' glutInit = 'glutInit'
     argv = call_toolkit_init(glutInit, argv)
 
     # Set display mode, create GLUT window, save window handle
@@ -44,9 +44,9 @@
     set_global 'glut_window', window
 
     # Set up GLUT callbacks
-    .const .Sub draw     = 'draw'
-    .const .Sub idle     = 'idle'
-    .const .Sub keyboard = 'keyboard'
+    .const 'Sub' draw     = 'draw'
+    .const 'Sub' idle     = 'idle'
+    .const 'Sub' keyboard = 'keyboard'
     glutDisplayFunc (draw)
     glutIdleFunc    (idle)
     glutKeyboardFunc(keyboard)