Change 11921 by jhi@alpha on 2001/09/06 17:52:43
Add a test for [ID 20010906.019] perl crashes on "undef foo"
Reported in 5.61, seems to work okay in blead.
Affected files ...
... //depot/perl/t/run/kill_perl.t#6 edit
Differences ...
==== //depot/perl/t/run/kill_perl.t#6 (text) ====
Index: perl/t/run/kill_perl.t
--- perl/t/run/kill_perl.t.~1~ Thu Sep 6 12:00:05 2001
+++ perl/t/run/kill_perl.t Thu Sep 6 12:00:05 2001
@@ -799,3 +799,8 @@
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.
End of Patch.
