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


I tried a test case from [perl #61602] in Rakudo and got this:

$ perl6
> my Int $x = NaN
Type check failed in assignment to '$x'; expected 'Int' but got 'Num'

> ^D
zsh: segmentation fault  ~/usr/parrot/parrot-blead/bin/perl6
$ perl6 --version
This is perl6 version 2013.09-146-gd7e5e1d built on parrot 5.7.0 revision 
RELEASE_5_7_0-17-g5264436

Note that the SEGV doesn't happen immediately; it only happens when
exiting the REPL via ^D.  The erroneous statement has to be the first
thing in the session, and all elements of the erroneous statement are
required.  Other statements can be issued between the erroneous one and
the ^D, and appear to work normally.  Issuing another statement *before*
the erroneous one gives a different result:

$ perl6
> 123
123
> my Int $x = NaN
Type check failed in assignment to '$x'; expected 'Int' but got 'Num'

> ^D
Null PMC access in push_string()
$

-zefram

Reply via email to