# New Ticket Created by Johan Viklund
# Please include the string: [perl #57388]
# in the subject line of all future correspondence about this issue.
# <URL: http://rt.perl.org/rt3/Ticket/Display.html?id=57388 >
Hi there, declaring classes in other namespaces except the toplevel
one results in "emtpy" classes (revision 29850).
This code:
class Foo::Bar { method foo {} }
my $b = Foo::Bar.new;
$b.foo;
Gives this stacktrace
Method 'foo' not found for invocant of class 'Foo::Bar'
current instr.: '_block11' pc 55 (EVAL_13:23)
called from Sub 'parrot;PCT::HLLCompiler;eval' pc 806
(src/PCT/HLLCompiler.pir:481)
called from Sub 'parrot;PCT::HLLCompiler;evalfiles' pc 1088
(src/PCT/HLLCompiler.pir:610)
called from Sub 'parrot;PCT::HLLCompiler;command_line' pc 1267
(src/PCT/HLLCompiler.pir:699)
called from Sub 'parrot;Perl6::Compiler;main' pc 14623 (perl6.pir:172)
I guess that a test for this would be along the lines of
class Foo::Bar { method foo {} }
my $b = Foo::Bar.new;
lives_ok($b.foo);
--
Johan Viklund