Author: pmichaud
Date: Fri Oct 5 08:48:33 2007
New Revision: 21888
Modified:
branches/pdd15oo/compilers/pge/PGE/Match.pir
branches/pdd15oo/runtime/parrot/library/PGE/Hs.pir
Log:
[pge]:
* Add workaround for load_bytecode/:method bug.
* All PGE tests now pass in pdd15oo.
Modified: branches/pdd15oo/compilers/pge/PGE/Match.pir
==============================================================================
--- branches/pdd15oo/compilers/pge/PGE/Match.pir (original)
+++ branches/pdd15oo/compilers/pge/PGE/Match.pir Fri Oct 5 08:48:33 2007
@@ -12,6 +12,7 @@
.sub '__onload' :load
.local pmc base
+ load_bytecode 'PGE/Dumper.pir' # FIXME, XXX, etc.
base = subclass 'Hash', 'PGE::Match'
addattribute base, '$.target' # target
addattribute base, '$.from' # start of match
Modified: branches/pdd15oo/runtime/parrot/library/PGE/Hs.pir
==============================================================================
--- branches/pdd15oo/runtime/parrot/library/PGE/Hs.pir (original)
+++ branches/pdd15oo/runtime/parrot/library/PGE/Hs.pir Fri Oct 5 08:48:33 2007
@@ -57,6 +57,9 @@
.sub "__onload" :load
.local pmc load
load_bytecode "Data/Escape.pir"
+ $P0 = get_class 'PGE::Match'
+ $P1 = get_hll_global ['PGE::Match'], 'dump_hs'
+ $P0.'add_method'('dump_hs', $P1)
.end
.sub "add_rule"
