[svn:parrot] r47672 - trunk/t/pmc

[NotFound at svn.parrot.org]

Author: NotFound
Date: Thu Jun 17 15:23:20 2010
New Revision: 47672
URL: https://trac.parrot.org/parrot/changeset/47672

Log:
fix StringIterator out of bounds tests that were passing for wrong reasons

Modified:
   trunk/t/pmc/stringiterator.t

Modified: trunk/t/pmc/stringiterator.t
==============================================================================
--- trunk/t/pmc/stringiterator.t	Thu Jun 17 13:59:39 2010	(r47671)
+++ trunk/t/pmc/stringiterator.t	Thu Jun 17 15:23:20 2010	(r47672)
@@ -161,38 +161,39 @@
     s = 'hi'
     it = iter s
     .local string rs
-    rs = pop it
-    rs = pop it
+    rs = shift it
+    rs = shift it
     eh = new ['ExceptionHandler']
+    push_eh eh
 
-    # pop string
+    # shift string
     set_addr eh, catch1
-    push_eh eh
-    rs = pop it
+    rs = shift it
     goto fail
 catch1:
     finalize eh
 
-    # pop integer
+    # shift integer
     set_addr eh, catch2
     .local int ri
-    ri = pop it
+    ri = shift it
     goto fail
 catch2:
     finalize eh
 
-    # shift string
+t3:
+    # pop string
     set_addr eh, catch3
     .local int ri
-    rs = shift it
+    rs = pop it
     goto fail
 catch3:
     finalize eh
 
-    # shift integer
+    # pop integer
     set_addr eh, catch4
     .local int ri
-    ri = shift it
+    ri = pop it
     goto fail
 catch4:
     finalize eh