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


$ perl6 -e '(;;)'
Non ast passed to UNWANTED: BOOTInt
Non ast passed to UNWANTED: BOOTInt
Non-QAST node visited BOOTInt
Weird node visited: BOOTInt
Non-QAST node visited BOOTInt
Weird node visited: BOOTInt
Non-QAST node visited BOOTInt
Weird node visited: BOOTInt
Non-QAST node visited BOOTInt
Weird node visited: BOOTInt
Weird node in analyze: BOOTInt
===SORRY!===
Unknown QAST node type BOOTInt
$

'(;)' yields worse misbehaviour, with an infinite loop.

-zefram

Reply via email to