From 15a59b2d28abd144de5a2003aa7accfc1140a21d Mon Sep 17 00:00:00 2001
From: "Michael G. Schwern" <schwern@pobox.com>
Date: Wed, 28 Nov 2001 11:37:01 -0500
Subject: [PATCH] (was Re: [ID 20011128.159] Segmentation faulton bad regexp)
 Message-ID: <20011128163701.H676@blackrider>

p4raw-id: //depot/perl@13353
---
 t/run/kill_perl.t | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/t/run/kill_perl.t b/t/run/kill_perl.t
index 306a743..6345a79 100644
--- a/t/run/kill_perl.t
+++ b/t/run/kill_perl.t
@@ -815,3 +815,7 @@ $foo = \-f "blah";
 print "ok" if ref $foo && !$$foo;
 EXPECT
 ok
+######## [ID 20011128.159] 'X' =~ /\X/ segfault in 5.6.1
+print "ok" if 'X' =~ /\X/;
+EXPECT
+ok
-- 
2.7.4