Switching HLLs with C< .HLL > doesn't reset the namespace. This leads
to some confusing bugs. Parrot should assume C< .namespace > whenever
it sees C< .HLL '...', '...' >.
mini:~/Projects/parrot mdiep$ cat test.pir
.HLL '_Tcl', ''
.namespace ['Foo'; 'Bar']
.HLL 'Tcl', ''
.sub main :main
$P0 = get_namespace
$P0 = $P0.'name'()
$S0 = join "::", $P0
print $S0 # should print "tcl", but actually prints "tcl::Foo::Bar"
print "\n"
end
.end
mini:~/Projects/parrot mdiep$ parrot test.pir
tcl::Foo::Bar
mini:~/Projects/parrot mdiep$
--
Matt Diephouse