Author: jquelin
Date: Wed Oct 3 09:00:56 2007
New Revision: 21772
Modified:
branches/pdd15oo/t/op/cmp-nonbranch.t
branches/pdd15oo/t/op/gc.t
branches/pdd15oo/t/op/string.t
Log:
more find_type removal
Modified: branches/pdd15oo/t/op/cmp-nonbranch.t
==============================================================================
--- branches/pdd15oo/t/op/cmp-nonbranch.t (original)
+++ branches/pdd15oo/t/op/cmp-nonbranch.t Wed Oct 3 09:00:56 2007
@@ -190,8 +190,7 @@
test_it:
res = 0
push_eh fubar
- $I1 = find_type $S0
- new $P0, $I1
+ $P0 = new $S0
clear_eh
goto test
Modified: branches/pdd15oo/t/op/gc.t
==============================================================================
--- branches/pdd15oo/t/op/gc.t (original)
+++ branches/pdd15oo/t/op/gc.t Wed Oct 3 09:00:56 2007
@@ -178,8 +178,7 @@
.local pmc o, cl
cl = newclass "Foo"
- find_type $I1, "Foo"
- new o, $I1
+ o= new "Foo"
print "ok\n"
end
.end
@@ -215,8 +214,7 @@
pasm_output_is( <<'CODE', <<OUTPUT, "failing if regsave is not marked" );
newclass P9, "Source"
newclass P10, "Source::Buffer"
- find_type I9,"Source"
- new P12, I9
+ P12 = new "Source"
set S20, P12
print S20
@@ -230,8 +228,7 @@
getprop P12, "buffer", P2
sweep 1
unless_null P12, buffer_ok
- find_type I12, "Source::Buffer"
- new P12, I12
+ P12 = new "Source::Buffer"
new P14, 'String'
set P14, "hello\n"
setprop P12, "buf", P14
@@ -292,8 +289,7 @@
$P0 = getinterp
$P0."recursion_limit"(10)
newclass $P0, "b"
- $I0 = find_type "b"
- $P0 = new $I0
+ $P0 = new "b"
$P1 = new 'Integer'
$P1 = 0
n = $P0."b11"($P1)
Modified: branches/pdd15oo/t/op/string.t
==============================================================================
--- branches/pdd15oo/t/op/string.t (original)
+++ branches/pdd15oo/t/op/string.t Wed Oct 3 09:00:56 2007
@@ -2668,8 +2668,7 @@
new P0, 'ResizablePMCArray'
- find_type I0, "Foo"
- new P1, I0
+ P1 = new "Foo"
push P0, P1
