# New Ticket Created by Moritz Lenz
# Please include the string: [perl #61096]
# in the subject line of all future correspondence about this issue.
# <URL: http://rt.perl.org/rt3/Ticket/Display.html?id=61096 >
Rakudo r24153:
# no error as expected
$ ./perl6 -e 'eval "my &foo ::= { "foo" }; foo;"'
# get error message from the failed eval (since ::= seems NYI):
$ ./perl6 -e 'eval "my &foo ::= { "foo" }; foo;"; say $!'
invoke() not implemented in class 'Undef'
# trying to print the return value:
./perl6 -e 'say eval "my &foo ::= { "foo" }; foo;"'
Null PMC access in get_string()
current instr.: 'print' pc 14225 (src/gen_builtins.pir:8585)
called from Sub 'say' pc 14247 (src/gen_builtins.pir:8595)
called from Sub '_block11' pc 74 (EVAL_13:24)
called from Sub 'parrot;PCT;HLLCompiler;eval' pc 892
(src/PCT/HLLCompiler.pir:508)
called from Sub 'parrot;PCT;HLLCompiler;command_line' pc 1441
(src/PCT/HLLCompiler.pir:771)
called from Sub 'parrot;Perl6;Compiler;main' pc 16584 (perl6.pir:168)
*** glibc detected *** corrupted double-linked list: 0x097bfb58 ***
Aborted
That's certainly wrong ;-)
Moritz
