Not sure if this is a bug or a misunderstanding on my part wrt the
current namespace situation.
I expect this to print out the number 3.14. (This is a very pared
down version of what Tcl in my sandbox is currently trying to do,
going between 'Tcl' and '_Tcl'.
$ cat foo.pir
.HLL 'cromulent', ''
.sub what
load_bytecode 'bar.pir'
.include 'interpinfo.pasm'
.local pmc var
var = interpinfo .INTERPINFO_NAMESPACE_ROOT
var = var['eek']
var = var['bark']
var()
.end
$ cat bar.pir
.HLL 'eek', ''
.sub foo :load :anon
$P1 = new .String
$P1 = "3.14\n"
store_global '$whee', $P1
.end
.sub bark
$P0 = find_global '$whee'
print $P0
.end
$ ./parrot foo.pir
Global '$whee' not found
current instr.: 'bark' pc 12 (/Users/coke/research/parrot/./bar.pir:13)
called from Sub 'what' pc 17 (foo.pir:11)