Author: pmichaud
Date: Wed Mar 8 12:48:27 2006
New Revision: 11831
Modified:
trunk/runtime/parrot/library/PGE/Util.pir
Log:
* PGE: Fixed erroneous subclass operation
Modified: trunk/runtime/parrot/library/PGE/Util.pir
==============================================================================
--- trunk/runtime/parrot/library/PGE/Util.pir (original)
+++ trunk/runtime/parrot/library/PGE/Util.pir Wed Mar 8 12:48:27 2006
@@ -108,7 +108,8 @@
emit(onload, " $I0 = find_type \"%s\"", namespace)
emit(onload, " if $I0 != 0 goto onload_%s", namecount)
emit(onload, " load_bytecode \"PGE.pbc\"")
- emit(onload, " $P0 = subclass \"PGE::Rule\", \"%s\"", namespace)
+ emit(onload, " $P0 = getclass \"PGE::Rule\"")
+ emit(onload, " $P0 = subclass $P0, \"%s\"", namespace)
emit(onload, " onload_%s:", namecount)
goto loop
compile_rule:
