From: Will Coleda <[EMAIL PROTECTED]>
Date: Sun, 30 Jul 2006 15:02:29 -0400
> languages/tcl/t/tcl_misc.t#27 has a test for this behavior.
>
> What's the generated PIR for this?
To get the pir generated by tcl (at least at the top level - there's
a lot of compiling going on throughout the runtime), do:
../../parrot tcl.pbc --pir -e 'set a [list a b]; set a b'
This doesn't work for me, even in a freshly-built (though somewhat
hacked) r13655:
[EMAIL PROTECTED]> ../../parrot tcl.pbc --pir -e 'set a [list a b]; set
a b'
too many arguments passed (3) - 2 params expected
current instr.: 'compile' pc 19796 (languages/tcl/src/compiler.pir:29)
called from Sub '_main' pc 474 (src/tclsh.pir:185)
[EMAIL PROTECTED]>
But I also notice that I can't run "make test" on Tcl because "prove" is
not on my path. I am using Perl 5.8.1, which is rather old, but not
that old, so maybe this is some quirk of the stock SuSE 9.0
configuration?
-- Bob Rogers