[svn:parrot] r49469 - trunk/t/op

[cotto at svn.parrot.org]

Author: cotto
Date: Thu Oct  7 22:06:32 2010
New Revision: 49469
URL: https://trac.parrot.org/parrot/changeset/49469

Log:
[t] remove a useless test that interferes with the next commit

Modified:
   trunk/t/op/gc.t

Modified: trunk/t/op/gc.t
==============================================================================
--- trunk/t/op/gc.t	Thu Oct  7 19:22:13 2010	(r49468)
+++ trunk/t/op/gc.t	Thu Oct  7 22:06:32 2010	(r49469)
@@ -38,7 +38,6 @@
     write_barrier_2()
     addr_registry_1()
     addr_registry_2_int()
-    addr_registry_2_str()
     pmc_proxy_obj_mark()
     coro_context_ret_continuation()
     # END_OF_TESTS
@@ -440,35 +439,6 @@
 .end
 
 
-# AddrRegistry 2
-.sub addr_registry_2_str
-    .local pmc a, b, c, reg, nil, it
-    null nil
-    reg = new 'AddrRegistry'
-    a = new 'String'
-    a = "k1"
-    b = new 'String'
-    b = "k2"
-    c = new 'String'
-    c = "k3"
-    reg[a] = nil
-    reg[b] = nil
-    reg[c] = nil
-
-    $P1 = new ['ResizablePMCArray']
-    it = iter reg
-loop:
-    unless it goto done
-    $P0 = shift it
-    $S0 = $P0
-    push $P1, $S0
-    goto loop
-done:
-    $P1.'sort'()
-    $S1 = join '', $P1
-    is($S1, 'k1k2k3')
-.end
-
 # verify pmc proxy object marking
 .sub pmc_proxy_obj_mark
     .local pmc cl, s, t