[svn:parrot] r27369 - trunk/compilers/pge/PGE

Author: pmichaud
Date: Tue May  6 20:03:58 2008
New Revision: 27369

Modified:
   trunk/compilers/pge/PGE/OPTable.pir

Log:
[pge]:
* Fix handling of <.ws> rule in OPTable parsing (resolves RT#52718).


Modified: trunk/compilers/pge/PGE/OPTable.pir
==============================================================================
--- trunk/compilers/pge/PGE/OPTable.pir	(original)
+++ trunk/compilers/pge/PGE/OPTable.pir	Tue May  6 20:03:58 2008
@@ -279,6 +279,12 @@
   with_tighter:
 
     ws = getattribute self, '&!ws'
+    unless null ws goto have_ws
+    $I0 = can mob, 'ws'
+    unless $I0 goto have_ws
+    ws = find_method mob, 'ws'
+  have_ws:
+
     tokenstack = new 'ResizablePMCArray'
     operstack = new 'ResizablePMCArray'
     termstack = new 'ResizablePMCArray'

• [svn:parrot] r27369 - trunk/compilers/pge/PGE by pmichaud