From @moritz

22​:53 <@​moritz_> rakudo​: say (*-3).signature.perl
22​:53 <+p6eval> rakudo 0eaf62​: OUTPUT«undef␤»
22​:54 <@​moritz_> rakudo​: say (-> $x { $x - 3 }).signature.perl
22​:54 <+p6eval> rakudo 0eaf62​: OUTPUT«​:(Object $x)␤»

I'd expect those two things to have the same signature (don't care about
the name of the param, though)

From @jnthn

On Thu Sep 24 13​:56​:16 2009, moritz wrote​:

22​:53 <@​moritz_> rakudo​: say (*-3).signature.perl
22​:53 <+p6eval> rakudo 0eaf62​: OUTPUT«undef␤»
22​:54 <@​moritz_> rakudo​: say (-> $x { $x - 3 }).signature.perl
22​:54 <+p6eval> rakudo 0eaf62​: OUTPUT«​:(Object $x)␤»

I'd expect those two things to have the same signature (don't care about
the name of the param, though)

This is no longer the case​:

00​:37 <@​jnthn> rakudo​: say (*-3).signature.perl
00​:37 <+p6eval> rakudo 8a5f38​: OUTPUT«​:(;; Mu $x)␤»

Giving to moritz++ for spectest.

Thanks,

Jonathan

The RT System itself - Status changed from 'new' to 'open'

From @moritz

And now properly tested in S02-builtin_data_types/whatever.t.

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

From @kyleha

This is an automatically generated mail to inform you that tests are now available in t/spec/S02-builtin_data_types/whatever.t

commit 8883b7464721ad7dc4e280e5e55b99c749207183
Author​: moritz <moritz@​c213334d-75ef-0310-aa23-eaa082d1ae64>
Date​: Tue Jun 22 20​:50​:38 2010 +0000

  [t/spec] tests for RT #​69362, signatures of WhateverCode objects
 
  git-svn-id​: http://svn.pugscode.org/pugs@&#8203;31412 c213334d-75ef-0310-aa23-eaa082d1ae64

diff --git a/t/spec/S02-builtin_data_types/whatever.t b/t/spec/S02-builtin_data_types/whatever.t
index b8f4c7f..53abcbf 100644
--- a/t/spec/S02-builtin_data_types/whatever.t
+++ b/t/spec/S02-builtin_data_types/whatever.t
@@ -176,6 +176,15 @@ is (0,0,0,0,0,0) >>+>> ((1,2) xx *), <1 2 1 2 1 2>, 'xx * works';
     is $x('dog'), 'GOD', 'we call both methods';
 }
 
+# RT #69362
+{
+    my $x = *.uc;
+    my $y = * + 3;
+    ok $x.signature, 'Whatever-curried method calls have a signature';
+    ok $y.signature, 'Whatever-curried operators have a signature';
+
+}
+
 done_testing;
 
 # vim: ft=perl6