From @moritz

00​:11 <@​moritz_> rakudo​: module A { sub b { return 'bar' }}; say A​::b()
00​:11 < p6eval> rakudo 35511​: OUTPUT«b␤»

should return 'bar', of course

00​:12 <@​moritz_> rakudo​: module A { sub b($x) { return 'bar' }}; say
  A​::b("blubb")
00​:12 < p6eval> rakudo 35511​: OUTPUT«bblubb␤»

even more curious ;-)

00​:12 <@​jnthn> rakudo​: module A { sub b { return 'bar' }}; say A​::b
00​:12 < p6eval> rakudo 35511​: OUTPUT«bar␤»

works

00​:13 <@​jnthn> rakudo​: module A { sub b { return 'bar' }}; say A​::b()
00​:13 < p6eval> rakudo 35511​: OUTPUT«b␤»

doesn't

00​:16 <@​moritz_> rakudo​: module A { sub b($x) { return 'bar' }}; say
  (A​::b("blubb")).perl
00​:16 < p6eval> rakudo 35513​: OUTPUT«[{ ... }, "blubb"]␤»

So A​::b() actually returns a Code object?

Cheers,
Moritz

From @moritz

On Tue Jan 13 15​:18​:05 2009, moritz wrote​:

00​:11 <@​moritz_> rakudo​: module A { sub b { return 'bar' }}; say A​::b()
00​:11 < p6eval> rakudo 35511​: OUTPUT«b␤»

The tests in t/spec/S11-modules/export.t did still pass because their
return value used to be their name only. I've changed that, and TODO'ed
three tests that now fail.

Cheers,
Moritz

@moritz - Status changed from 'new' to 'open'

From @jeffhorwitz

the Foo​::bar() format for calling subs no longer works as of r35597. for
me personally, it's a blocker for mod_perl6.

if i run the following script, the second sub call never happens, and
there is no error.

  module Foo;

  sub bar($arg)
  {
  say $arg;
  }

  bar("without namespace");
  Foo​::bar("with namespace");

[jeff@​groovy perl6]$ ../../parrot perl6.pbc x.p6
without namespace
[jeff@​groovy perl6]$

the PIR shows that instead of invoking the sub, rakudo is invoking "infix​:,"​:

.namespace ["Foo"]
.sub "_block20" :subid("12")
  .const 'Sub' $P23 = "13"
  capture_lex $P23
  $P22 = "!meta_create"("module", "Foo", 0)
  .local pmc metaclass
  set metaclass, $P22
  "!meta_compose"(metaclass)
  new $P33, "Str"
  assign $P33, "without namespace"
  "bar"($P33)
  get_hll_global $P34, ["Foo"], "bar"
  new $P35, "Str"
  assign $P35, "with namespace"
  $P36 = "infix​:,"($P34, $P35) # <--- offending code here
  .return ($P36)
.end

-jeff

From @moritz

This is the same bug as RT #​62326, with a bit different analysis. Merging.

From @jnthn

On Tue Jan 13 15​:18​:05 2009, moritz wrote​:

00​:11 <@​moritz_> rakudo​: module A { sub b { return 'bar' }}; say A​::b()
00​:11 < p6eval> rakudo 35511​: OUTPUT«b␤»

should return 'bar', of course

This and the various other cases in this ticket are resolved in r35763.

Thanks!

Jonathan

@jnthn - Status changed from 'open' to 'resolved'