Navigation Menu

Skip to content
New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

3 % * dies with Ambiguous Dispatch #1262

Closed
p6rt opened this issue Aug 31, 2009 · 5 comments
Closed

3 % * dies with Ambiguous Dispatch #1262

p6rt opened this issue Aug 31, 2009 · 5 comments

Comments

@p6rt
Copy link

p6rt commented Aug 31, 2009

Migrated from rt.perl.org#68894 (status was 'resolved')

Searchable as RT68894$

@p6rt
Copy link
Author

p6rt commented Aug 31, 2009

From @moritz

rakudo 4fc254​:
$ perl6 -e '3 % *'
Ambiguous dispatch to multi 'infix​:%'. Ambiguous candidates had signatures​:
:(Any $a, Whatever $b)
:(Any $a, Whatever $b)
in Main (<unknown>​:1)

This used to work[tm] before the operator refactor thingies.

Cheers,
Moritz

@p6rt
Copy link
Author

p6rt commented Aug 31, 2009

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 3911c7a585882d8b8dc8ddc0af1d6ef6dd97dbcc
Author​: moritz <moritz@​c213334d-75ef-0310-aa23-eaa082d1ae64>
Date​: Mon Aug 31 19​:48​:47 2009 +0000

  [t/spec] test for RT #​68894, $number % *
 
  git-svn-id​: http://svn.pugscode.org/pugs@&#8203;28144 c213334d-75ef-0310-aa23-eaa082d1ae64

Inline Patch
diff --git a/t/spec/S02-builtin_data_types/whatever.t b/t/spec/S02-builtin_data_types/whatever.t
index 57f6f5d..0f84517 100644
--- a/t/spec/S02-builtin_data_types/whatever.t
+++ b/t/spec/S02-builtin_data_types/whatever.t
@@ -1,7 +1,7 @@
 use v6;
 use Test;
 
-plan 23;
+plan 24;
 
 # L<S02/Built-In Data Types/"The * character as a standalone term captures the notion of">
 # L<S02/Native types/"If any native type is explicitly initialized to">
@@ -47,6 +47,14 @@ is @a, [1,2,3,4], '*.meth created closure works';
     is @a, 1..4, 'array is unmodified after reference to [1..*]';
 }
 
+# RT #68894
+#?rakudo skip 'RT 68894'
+{
+    my @a = <a b>;
+    my $t = join '', map { @a[$_ % *] }, 1..5;
+    is $t, 'ababa', '$_ % * works';
+}
+
 {
     my $x = +*;
     isa_ok $x, Code, '+* is of type Code';

@p6rt
Copy link
Author

p6rt commented Aug 31, 2009

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

@p6rt
Copy link
Author

p6rt commented Aug 31, 2009

From @pmichaud

Now fixed in e005879.

Thanks!

Pm

@p6rt
Copy link
Author

p6rt commented Aug 31, 2009

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

@p6rt p6rt closed this as completed Aug 31, 2009
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
Labels
None yet
Projects
None yet
Development

No branches or pull requests

1 participant