Author: pmichaud
Date: Thu Oct 27 08:35:25 2005
New Revision: 9594
Modified:
trunk/compilers/pge/PGE/P6Rule.pir
Log:
Added store_global to preserve code segments of compiled rules.
Modified: trunk/compilers/pge/PGE/P6Rule.pir
==============================================================================
--- trunk/compilers/pge/PGE/P6Rule.pir (original)
+++ trunk/compilers/pge/PGE/P6Rule.pir Thu Oct 27 08:35:25 2005
@@ -908,6 +908,7 @@ needed).
$S0 = code
rule = $P0($S0)
if has_name == 0 goto p6rule_2
+ store_global grammar, name, rule
$I0 = find_type grammar
if $I0 > 0 goto p6rule_2
$P0 = getclass "PGE::Rule"
