Permalink
Browse files

Do not complain when exporting exactly the same symbol twice

fixes RT #118965
  • Loading branch information...
1 parent 73a8420 commit 1f1076a2facc612b67af7adfe6def5e41c8a94c0 @moritz moritz committed Jul 27, 2013
Showing with 3 additions and 0 deletions.
  1. +3 −0 src/Perl6/World.nqp
View
@@ -386,6 +386,9 @@ class Perl6::World is HLL::World {
# if both are multis and have onlystar dispatchers.
my $installed := %sym<value>;
my $foreign := $_.value;
+ if $installed =:= $foreign {
+ next;
+ }
if nqp::can($installed, 'is_dispatcher') && $installed.is_dispatcher
&& nqp::can($foreign, 'is_dispatcher') && $foreign.is_dispatcher {
# Both dispatchers, but are they onlystar? If so, we can

0 comments on commit 1f1076a

Please sign in to comment.