Author: coke
Date: Mon Nov 10 22:32:58 2008
New Revision: 32518
Modified:
trunk/runtime/parrot/library/Iter.pir
trunk/runtime/parrot/library/Pg.pir
trunk/t/compilers/imcc/imcpasm/optc.t
trunk/t/compilers/imcc/syn/bsr.t
trunk/t/compilers/imcc/syn/pcc.t
Log:
RT #58974 - use of .return as a synonym for .tailcall is [DEPRECATED]
Modified: trunk/runtime/parrot/library/Iter.pir
==============================================================================
--- trunk/runtime/parrot/library/Iter.pir (original)
+++ trunk/runtime/parrot/library/Iter.pir Mon Nov 10 22:32:58 2008
@@ -152,7 +152,7 @@
.sub 'nextval' :method
self.'next'()
- .return self.'value'()
+ .tailcall self.'value'()
.end
=back
Modified: trunk/runtime/parrot/library/Pg.pir
==============================================================================
--- trunk/runtime/parrot/library/Pg.pir (original)
+++ trunk/runtime/parrot/library/Pg.pir Mon Nov 10 22:32:58 2008
@@ -191,7 +191,7 @@
con = getattribute self, 'con'
exec = get_root_global ['parrot';'Pg'], 'PQexec'
res = exec(con, cmd)
- .return mk_res(res)
+ .tailcall mk_res(res)
.end
.include "datatypes.pasm"
@@ -237,7 +237,7 @@
(n, vals) = mk_struct(values)
# we don't handle binary
res = exec(con, cmd, n, nil, vals, nil, nil, 0)
- .return mk_res(res)
+ .tailcall mk_res(res)
.end
=item res = con.'prepare'(name, query, nparams)
@@ -255,7 +255,7 @@
f = get_root_global ['parrot';'Pg'], 'PQprepare'
nil = new 'ManagedStruct'
res = f(con, name, query, nparams, nil)
- .return mk_res(res)
+ .tailcall mk_res(res)
.end
=item res = con.'execPrepared'(name, val, ...)
@@ -274,7 +274,7 @@
nil = new 'ManagedStruct'
(n, vals) = mk_struct(values)
res = f(con, name, n, vals, nil, nil, 0)
- .return mk_res(res)
+ .tailcall mk_res(res)
.end
=item $P0 = con.'setNoticeReceiver'(cb, arg)
Modified: trunk/t/compilers/imcc/imcpasm/optc.t
==============================================================================
--- trunk/t/compilers/imcc/imcpasm/optc.t (original)
+++ trunk/t/compilers/imcc/imcpasm/optc.t Mon Nov 10 22:32:58 2008
@@ -26,7 +26,7 @@
recurse:
$I1= i - 1
- .return foo($I1)
+ .tailcall foo($I1)
.end
CODE
0
@@ -56,7 +56,7 @@
print "\n"
end
tc:
- .return foo(1, 9, i, j,k)
+ .tailcall foo(1, 9, i, j,k)
.end
CODE
i 9 j 1 k 2 l 3
@@ -81,7 +81,7 @@
print "\n"
end
tc:
- .return foo(1, j, i, i)
+ .tailcall foo(1, j, i, i)
.end
CODE
i 2 j 1 k 1
@@ -115,7 +115,7 @@
print "\n"
end
tc:
- .return foo(1, m,i,j,k,l)
+ .tailcall foo(1, m,i,j,k,l)
.end
CODE
i 5 j 1 k 2 l 3 m 4
@@ -149,7 +149,7 @@
print "\n"
end
tc:
- .return foo(1, m,l,j,i,k)
+ .tailcall foo(1, m,l,j,i,k)
.end
CODE
i 5 j 4 k 2 l 1 m 3
@@ -183,7 +183,7 @@
print "\n"
end
tc:
- .return foo(1, k,m,i,j,l)
+ .tailcall foo(1, k,m,i,j,l)
.end
CODE
i 3 j 5 k 1 l 2 m 4
@@ -217,7 +217,7 @@
print "\n"
end
tc:
- .return foo(1, j,i,j,i,j)
+ .tailcall foo(1, j,i,j,i,j)
.end
CODE
i 2 j 1 k 2 l 1 m 2
@@ -260,7 +260,7 @@
.sub foo
.param int i
.param int j
- .return foo(I2, I3)
+ .tailcall foo(I2, I3)
.end
CODE
/ set I\d, I2
@@ -274,7 +274,7 @@
.sub foo
.param int i
.param int j
- .return foo(j, i)
+ .tailcall foo(j, i)
.end
CODE
/ set I(\d), I(\d)
@@ -301,7 +301,7 @@
print "\n"
end
tc:
- .return foo(1, i, k, j)
+ .tailcall foo(1, i, k, j)
.end
CODE
i 1 j 3 k 2
@@ -347,7 +347,7 @@
print "\\n"
end
tc:
- .return foo(1, $x )
+ .tailcall foo(1, $x )
.end
CODE
$y
@@ -382,7 +382,7 @@
print "\\n"
end
tc:
- .return foo(1, $x )
+ .tailcall foo(1, $x )
.end
CODE
$y
@@ -412,7 +412,7 @@
print "\\n"
end
tc:
- .return foo(1, $x )
+ .tailcall foo(1, $x )
.end
CODE
$y
Modified: trunk/t/compilers/imcc/syn/bsr.t
==============================================================================
--- trunk/t/compilers/imcc/syn/bsr.t (original)
+++ trunk/t/compilers/imcc/syn/bsr.t Mon Nov 10 22:32:58 2008
@@ -70,7 +70,7 @@
if n <= 1 goto fin
f = f * n
dec n
- .return _fact(f, n)
+ .tailcall _fact(f, n)
fin:
.return(f)
.end
Modified: trunk/t/compilers/imcc/syn/pcc.t
==============================================================================
--- trunk/t/compilers/imcc/syn/pcc.t (original)
+++ trunk/t/compilers/imcc/syn/pcc.t Mon Nov 10 22:32:58 2008
@@ -138,7 +138,7 @@
recur:
product = product * count
dec count
- .return _fact(product, count)
+ .tailcall _fact(product, count)
.end
CODE
