# New Ticket Created by Stefan O'Rear
# Please include the string: [perl #73944]
# in the subject line of all future correspondence about this issue.
# <URL: http://rt.perl.org/rt3/Ticket/Display.html?id=73944 >
The file can be loaded as a main program, but not using load_bytecode.
There is both a trivial bug and a subtle bug.
First, ClassToBe in ClassHOW.pir is defined in an :init block; it needs
to be defined in an :init :load block. This is the trivial bug.
The subtle bug, I have failed to track. It manifests as an exception
generated at load_bytecode time:
too many positional arguments: 3 passed, 1 expected
current instr.: 'parrot;P6protoobject;new' pc 1316
(runtime/parrot/library/P6object.pir:784)
called from Sub 'perl6;Any;_block3575' pc 333021 (src/gen/core.pir:28792)
called from Sub '!fire_phasers' pc 1023 (src/glue/phasers.pir:47)
called from Sub '!UNIT_START' pc 1299 (src/glue/run.pir:24)
called from Sub '_block30514' pc -1 ((unknown file):-1)
called from Sub '_block11' pc 0 (EVAL_1:6)
... call repeated 1 times
_block3575 corresponds to:
INIT {
our @trig-base-conversions = (1.0, pi / 180.0, pi / 200.0, 2.0 * pi);
}
in src/core/Any-num.pm.
-sorear
