# New Ticket Created by  "Carl Mäsak" 
# Please include the string:  [perl #111382]
# in the subject line of all future correspondence about this issue. 
# <URL: https://rt.perl.org:443/rt3/Ticket/Display.html?id=111382 >


<moritz> nom: sub increase-by-n($orig, $n) { ($orig, *.succ ... *)[$n]
}; say increase-by-n('a', 18)
<p6eval> nom 409db1: OUTPUT«s␤»
<masak> nom: sub increase-by-n($orig, $n) { ($orig ... *)[$n] }; say
increase-by-n('a', 18)
<p6eval> nom 409db1: OUTPUT«Decrement out of range [...]
<masak> decrement!?
<masak> nom: .say for (1 ... 100)[^10]
<p6eval> nom 409db1: OUTPUT«1␤2␤3␤4␤5␤6␤7␤8␤9␤10␤»
<masak> nom: .say for (1 ... *)[^10]
<p6eval> nom 409db1: OUTPUT«1␤2␤3␤4␤5␤6␤7␤8␤9␤10␤»
<masak> nom: .say for ("a" ... *)[^10]
<p6eval> nom 409db1: OUTPUT«Decrement out of range [...]
<masak> I call bug.
* moritz calls masak
* masak submits rakudobug

Reply via email to