Author: pmichaud
Date: Sat Dec  6 13:44:45 2008
New Revision: 33577

Modified:
   trunk/compilers/tge/TGE/Compiler.pir

Log:
[tge]:  When iterating keyed values of TGE;Parser (Match) objects, use .hash()


Modified: trunk/compilers/tge/TGE/Compiler.pir
==============================================================================
--- trunk/compilers/tge/TGE/Compiler.pir        (original)
+++ trunk/compilers/tge/TGE/Compiler.pir        Sat Dec  6 13:44:45 2008
@@ -113,7 +113,8 @@
     .local pmc result
 
     .local pmc iter
-    iter = new 'Iterator', node    # setup iterator for node
+    $P0 = node.'hash'()
+    iter = new 'Iterator', $P0    # setup iterator for node
     iter = 0
   iter_loop:
     unless iter, iter_end         # while (entries) ...
@@ -135,7 +136,8 @@
     rule = new 'Hash'
 
     .local pmc iter
-    iter = new 'Iterator', node    # setup iterator for node
+    $P0 = node.'hash'()
+    iter = new 'Iterator', $P0    # setup iterator for node
     iter = 0
   iter_loop:
     unless iter, iter_end         # while (entries) ...
@@ -169,7 +171,8 @@
     decl = new 'Hash'
 
     .local pmc iter
-    iter = new 'Iterator', node    # setup iterator for node
+    $P0 = node.'hash'()
+    iter = new 'Iterator', $P0    # setup iterator for node
     iter = 0
   iter_loop:
     unless iter, iter_end         # while (entries) ...

Reply via email to