# New Ticket Created by  Zoffix Znet 
# Please include the string:  [perl #131574]
# in the subject line of all future correspondence about this issue. 
# <URL: https://rt.perl.org/Ticket/Display.html?id=131574 >


The circularity detection[^1] code, seems to incorrectly detect this case as 
circularity:

16:28   eveo    m: multi infix:<+>(Real, Pair $ where {.value === True}) { 42 
}; say 1 + :a;
16:28   camelia         rakudo-moar 14d757: OUTPUT: «===SORRY!===␤Circularity 
detected in multi sub types for &infix:<+>␤»
16:28   eveo    m: multi infix:<+>(Real $ where {True}, Pair $ where {.value 
=== True}) { 42 }; say 1 + :a;
16:28   camelia         rakudo-moar 14d757: OUTPUT: «===SORRY!===␤Circularity 
detected in multi sub types for &infix:<+>␤»

16:28   eveo    m: multi infix:<+>(Int, Pair $ where {.value === True}) { 42 }; 
say 1 + :a;
16:28   camelia         rakudo-moar 14d757: OUTPUT: «42␤»



[1] 
https://github.com/rakudo/rakudo/blob/14d757131159b536d64447f567bc9a8324a271ca/src/Perl6/Metamodel/BOOTSTRAP.nqp#L2157

Reply via email to