Added some more list-based commands.

Added upvar (alias to caller's variables), uplevel (execute code in caller's 
scope). (or your caller's caller, or...)

Also added a non-standard "inline" command so you can do:

oolong:~/research/parrot/languages/tcl/examples coke$ cat inline.tcl inline PIR {
.sub junk
$P0 = new String
$P0 = "nifty"
store_lex 0, "a", $P0
.end
}
puts $a
oolong:~/research/parrot/languages/tcl/examples coke$ make inline cd ../../../ && ./parrot languages/tcl/tcl.pbc languages/tcl/examples/inline.tcl
nifty



Volunteers welcome. =-)

Reply via email to