[svn:parrot] r43641 - in branches/kill_array_pmc/t: compilers/imcc/syn op pmc

whiteknight at svn.parrot.org whiteknight at svn.parrot.org
Fri Jan 29 16:17:18 UTC 2010


Author: whiteknight
Date: Fri Jan 29 16:17:17 2010
New Revision: 43641
URL: https://trac.parrot.org/parrot/changeset/43641

Log:
update a few more tests. All as easy as converting 'Array' to 'resizablePMCArray'. A more thoughtful reading could maybe pick types slightly better suited for each case

Modified:
   branches/kill_array_pmc/t/compilers/imcc/syn/const.t
   branches/kill_array_pmc/t/op/calling.t
   branches/kill_array_pmc/t/op/spawnw.t
   branches/kill_array_pmc/t/pmc/namespace-old.t

Modified: branches/kill_array_pmc/t/compilers/imcc/syn/const.t
==============================================================================
--- branches/kill_array_pmc/t/compilers/imcc/syn/const.t	Fri Jan 29 16:06:23 2010	(r43640)
+++ branches/kill_array_pmc/t/compilers/imcc/syn/const.t	Fri Jan 29 16:17:17 2010	(r43641)
@@ -78,7 +78,7 @@
    .const string key2 = "key2"
    .local int idx1
    .const int idx2 = 2
-   ar = new 'Array'
+   ar = new 'ResizablePMCArray'
    ar = 3
    ha = new 'Hash'
    key1 = "key1"

Modified: branches/kill_array_pmc/t/op/calling.t
==============================================================================
--- branches/kill_array_pmc/t/op/calling.t	Fri Jan 29 16:06:23 2010	(r43640)
+++ branches/kill_array_pmc/t/op/calling.t	Fri Jan 29 16:17:17 2010	(r43641)
@@ -1105,7 +1105,7 @@
         print "\n"
 .end
 .sub main :main
-        $P34 = new 'Array'
+        $P34 = new 'ResizablePMCArray'
         $P34 = 0
         ## normal flattening direct call, non-slurpy returns
         $P35 = _fn1($P34 :flat)
@@ -1135,7 +1135,7 @@
     $P30 = 2
     $P31 = new 'Integer'
     $P31 = 3
-    $P34 = new 'Array'
+    $P34 = new 'ResizablePMCArray'
     $P34 = 2
     $P34[0] = $P30
     $P34[1] = $P31
@@ -1168,7 +1168,7 @@
     $P30 = 2
     $P31 = new 'Integer'
     $P31 = 3
-    $P34 = new 'Array'
+    $P34 = new 'ResizablePMCArray'
     $P34 = 3
     $P34[0] = $P30
     $P34[1] = $P31
@@ -1201,7 +1201,7 @@
     $P30 = 2
     $P31 = new 'Integer'
     $P31 = 3
-    $P34 = new 'Array'
+    $P34 = new 'ResizablePMCArray'
     $P34 = 4
     $P34[0] = $P30
     $P34[1] = $P31
@@ -1235,7 +1235,7 @@
     $P30 = 2
     $P31 = new 'Integer'
     $P31 = 3
-    $P34 = new 'Array'
+    $P34 = new 'ResizablePMCArray'
     $P34 = 2
     $P34[0] = $P30
     $P34[1] = $P31

Modified: branches/kill_array_pmc/t/op/spawnw.t
==============================================================================
--- branches/kill_array_pmc/t/op/spawnw.t	Fri Jan 29 16:06:23 2010	(r43640)
+++ branches/kill_array_pmc/t/op/spawnw.t	Fri Jan 29 16:17:17 2010	(r43641)
@@ -91,7 +91,7 @@
 # test array version of spawnw
 
 pasm_output_is( <<'CODE', <<'OUTPUT', "exit code: 0" );
-        new     P0, 'Array'
+        new     P0, 'ResizablePMCArray'
         set     P0, 3
         set     P0[0], "perl"
         set     P0[1], "-e"
@@ -108,7 +108,7 @@
 OUTPUT
 
 pasm_output_is( <<'CODE', <<'OUTPUT', "exit code: 123" );
-        new     P0, 'Array'
+        new     P0, 'ResizablePMCArray'
         set     P0, 3
         set     P0[0], "perl"
         set     P0[1], "-e"
@@ -125,7 +125,7 @@
 OUTPUT
 
 pasm_output_is( <<'CODE', <<'OUTPUT', "exit code: 3" );
-        new     P0, 'Array'
+        new     P0, 'ResizablePMCArray'
         set     P0, 3
         set     P0[0], "perl"
         set     P0[1], "-e"

Modified: branches/kill_array_pmc/t/pmc/namespace-old.t
==============================================================================
--- branches/kill_array_pmc/t/pmc/namespace-old.t	Fri Jan 29 16:06:23 2010	(r43640)
+++ branches/kill_array_pmc/t/pmc/namespace-old.t	Fri Jan 29 16:17:17 2010	(r43641)
@@ -950,7 +950,7 @@
 
 .sub main :main
     .local pmc not_a_ns
-    not_a_ns = new ['Array']
+    not_a_ns = new ['ResizablePMCArray']
 
     set_global 'Not_A_NS', not_a_ns
 
@@ -1040,7 +1040,7 @@
 pir_output_like( <<'CODE', <<'OUTPUT', 'del_sub() with error' );
 .sub main :main
     .local pmc not_a_ns
-    not_a_ns = new ['Array']
+    not_a_ns = new ['ResizablePMCArray']
 
     set_global 'Not_A_Sub', not_a_ns
 


More information about the parrot-commits mailing list