Author: pmichaud
Date: Fri Oct 5 08:47:48 2007
New Revision: 21887
Modified:
branches/pdd15oo/runtime/parrot/library/PGE/Dumper.pir
Log:
[pge]:
* Eliminate last traces of "class\x0name" attributes from PGE.
Modified: branches/pdd15oo/runtime/parrot/library/PGE/Dumper.pir
==============================================================================
--- branches/pdd15oo/runtime/parrot/library/PGE/Dumper.pir (original)
+++ branches/pdd15oo/runtime/parrot/library/PGE/Dumper.pir Fri Oct 5
08:47:48 2007
@@ -123,7 +123,7 @@
$S0 = $I0
out .= $S0
out .= "\n"
- capt = getattribute self, "PGE::[EMAIL PROTECTED]"
+ capt = getattribute self, '@!capt'
if_null capt, subrules
spi = 0
spc = elements capt
@@ -481,11 +481,11 @@
goto dump_hash
dump_rest:
print "\n"
- $P0 = getattribute self, "PGE::OPTable\x0%!key"
+ $P0 = getattribute self, '%!key'
print subindent
dumper."dump"(label, $P0)
print "\n"
- $P0 = getattribute self, "PGE::OPTable\x0%!klen"
+ $P0 = getattribute self, '%!klen'
print subindent
dumper."dump"(label, $P0)
print indent
