# New Ticket Created by  Will Coleda 
# Please include the string:  [perl #37545]
# in the subject line of all future correspondence about this issue. 
# <URL: https://rt.perl.org/rt3/Ticket/Display.html?id=37545 >


Given these two files:

$ cat foo.pir
.HLL 'Tcl', 'tcl_group'

.sub main :main
   $P1 = new .TclString
   $P1 = ''
.end
$ cat bar.pir
.HLL 'Tcl', 'tcl_group'

.sub second
   $P1 = new .TclString
   $P1 = ''
.end

 From the top level parrot directory, I'm able to run:

./parrot -o foo.pbc foo.pir
./parrot -o bar.pbc bar.pir
./pbc_merge -o whee.pbc foo.pbc bar.pbc

But if I try this from languages/tcl, I get:

../../parrot -o foo.pbc foo.pir
../../parrot -o bar.pbc bar.pir
../../pbc_merge -o whee.pbc foo.pbc bar.pbc

Couldn't load 'tcl_group': unknown reason
(null)Couldn't load 'tcl_group': unknown reason
(null)


Reply via email to