[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