cvsuser 04/12/15 04:29:35
Modified: imcc/t/reg spill.t
Log:
Fix an error that was preventing this test from running.
Revision Changes Path
1.11 +1 -1 parrot/imcc/t/reg/spill.t
Index: spill.t
===================================================================
RCS file: /cvs/public/parrot/imcc/t/reg/spill.t,v
retrieving revision 1.10
retrieving revision 1.11
diff -u -r1.10 -r1.11
--- spill.t 14 Dec 2004 09:06:22 -0000 1.10
+++ spill.t 15 Dec 2004 12:29:35 -0000 1.11
@@ -668,7 +668,7 @@
all params ok
OUT
-my $code = repeat($template2, 22,
+$code = repeat($template2, 22,
LOCALS => ".local PerlInt a<index>\n\ta<index> = new PerlInt",
INITS => 'a<index> = <index>',
ARGS => 'a<index>',
