[svn:parrot] r40264 - branches/bsr_jsr_ret/runtime/parrot/library/PGE

[whiteknight at svn.parrot.org]

Author: whiteknight
Date: Sat Jul 25 10:37:56 2009
New Revision: 40264
URL: https://trac.parrot.org/parrot/changeset/40264

Log:
[bsr_jsr_ret] fix a stupid mistake on my part in PGE/Dumper.pir, which fixes the last failing test. However, this test now hangs for some reason I think, so that needs diagnosing

Modified:
   branches/bsr_jsr_ret/runtime/parrot/library/PGE/Dumper.pir

Modified: branches/bsr_jsr_ret/runtime/parrot/library/PGE/Dumper.pir
==============================================================================
--- branches/bsr_jsr_ret/runtime/parrot/library/PGE/Dumper.pir	Sat Jul 25 08:11:48 2009	(r40263)
+++ branches/bsr_jsr_ret/runtime/parrot/library/PGE/Dumper.pir	Sat Jul 25 10:37:56 2009	(r40264)
@@ -104,6 +104,8 @@
     .local int spi, spc
     .local pmc it
     .local string prefix1, prefix2
+    .local pmc jmpstack
+    jmpstack = new 'ResizableIntegerArray'
 
     if has_b2 goto start
     b2 = "]"
@@ -139,8 +141,6 @@
     $I0 = defined capt[spi]
     unless $I0 goto subpats_2
     $P0 = capt[spi]
-    .local pmc jmpstack
-    jmpstack = new 'ResizableIntegerArray'
     local_branch jmpstack, dumper
   subpats_2:
     inc spi