[svn:parrot] r39828 - branches/tt761_keys_revamp/t/pmc

[bacek at svn.parrot.org]

Author: bacek
Date: Mon Jun 29 09:58:17 2009
New Revision: 39828
URL: https://trac.parrot.org/parrot/changeset/39828

Log:
[t] Fix orderedhash test

Modified:
   branches/tt761_keys_revamp/t/pmc/orderedhash.t

Modified: branches/tt761_keys_revamp/t/pmc/orderedhash.t
==============================================================================
--- branches/tt761_keys_revamp/t/pmc/orderedhash.t	Mon Jun 29 09:57:57 2009	(r39827)
+++ branches/tt761_keys_revamp/t/pmc/orderedhash.t	Mon Jun 29 09:58:17 2009	(r39828)
@@ -94,7 +94,8 @@
 iter_loop:
     unless P2, end_iter
     shift P3, P2
-    print P3
+    set P4, P0[P3]
+    print P4
     branch iter_loop
 end_iter:
 
@@ -102,7 +103,8 @@
 iter_loop2:
     unless P2, end_iter2
     pop P3, P2
-    print P3
+    set P4, P0[P3]
+    print P4
     branch iter_loop2
 end_iter2:
     end