This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
sv.c:varname: Fix bad assertion added by c6fb3f6e
authorFather Chrysostomos <sprout@cpan.org>
Sat, 4 Aug 2012 17:16:01 +0000 (10:16 -0700)
committerFather Chrysostomos <sprout@cpan.org>
Sat, 4 Aug 2012 22:56:22 +0000 (15:56 -0700)
commit3207fc6be298e308e8094e866ca339ba7e9a2790
treee3874cdfca9626a02f9b08cd19bf603e39345355
parent5ceaabe8e4e93dd375a9f43ffc52956b89ed492d
sv.c:varname: Fix bad assertion added by c6fb3f6e

#!perl -w
my $x;
format =
@
"$x";
.
write;
__END__
Assertion failed: (!cv || SvTYPE(cv) == SVt_PVCV), function Perl_varname, file sv.c, line 13924.
Abort trap
sv.c
t/lib/warnings/9uninit