This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Add a test for [ID 20010906.019] perl crashes on "undef foo"
authorJarkko Hietaniemi <jhi@iki.fi>
Thu, 6 Sep 2001 17:52:43 +0000 (17:52 +0000)
committerJarkko Hietaniemi <jhi@iki.fi>
Thu, 6 Sep 2001 17:52:43 +0000 (17:52 +0000)
Reported in 5.61, seems to work okay in blead.

p4raw-id: //depot/perl@11921

t/run/kill_perl.t

index fa3bbec..d782bb3 100644 (file)
@@ -799,3 +799,8 @@ tie FOO, "Foo";
 EXPECT
 Can't modify constant item in tie at - line 1, near ""Foo";"
 Execution of - aborted due to compilation errors.
+######## undefing constant causes a segfault in 5.6.1 [ID 20010906.019]
+undef foo;
+EXPECT
+Can't modify constant item in undef operator at - line 1, near "foo;"
+Execution of - aborted due to compilation errors.