summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMichael G. Schwern <schwern@pobox.com>2001-09-05 13:22:25 -0400
committerJarkko Hietaniemi <jhi@iki.fi>2001-09-05 22:36:35 +0000
commitf8d0fd749c2c5cc68be89616233b24982e69f7de (patch)
tree82af79893e532e4b20fc30eb79080fc2dbd30a49
parent6e9d10810a2ec27ec94fd014e5dbab341c35afb1 (diff)
downloadperl-f8d0fd749c2c5cc68be89616233b24982e69f7de.tar.gz
tying a bareword causes a segfault in 5.6.1
Message-ID: <20010905172225.C11386@blackrider> p4raw-id: //depot/perl@11893
-rw-r--r--t/run/kill_perl.t5
1 files changed, 5 insertions, 0 deletions
diff --git a/t/run/kill_perl.t b/t/run/kill_perl.t
index aa7a4a9d45..07df0485ca 100644
--- a/t/run/kill_perl.t
+++ b/t/run/kill_perl.t
@@ -788,3 +788,8 @@ EXPECT
EXPECT
Can't modify constant item in list assignment at - line 1, near ");"
Execution of - aborted due to compilation errors.
+######## tying a bareword causes a segfault in 5.6.1
+tie FOO, "Foo";
+EXPECT
+Can't modify constant item in tie at - line 1, near ""Foo";"
+Execution of - aborted due to compilation errors.