summaryrefslogtreecommitdiff
path: root/t
diff options
context:
space:
mode:
authorJeff Pinyan <japhy@pobox.com>2001-09-08 11:42:30 -0400
committerJarkko Hietaniemi <jhi@iki.fi>2001-09-09 12:53:12 +0000
commit727f22e3bfa8ab582ce8ac7dc421247d52c9d694 (patch)
treee90481a4aa4a9fc78aef1893e45ff038b7b416d1 /t
parent0106e1e7009c64ce545a45f6eb9370f52b832ad1 (diff)
downloadperl-727f22e3bfa8ab582ce8ac7dc421247d52c9d694.tar.gz
[PATCH regcomp.c] zero-width assertions CAN be ?'d
Date: Sat, 8 Sep 2001 15:42:30 -0400 (EDT) Message-ID: <Pine.GSO.4.21.0109081535480.24489-100000@crusoe.crusoe.net> Subject: Re: [PATCH t/op/misc.t] regcomp.c patch broke test From: "Jeff 'japhy/Marillion' Pinyan" <jeffp@crusoe.net> Date: Sat, 8 Sep 2001 18:33:12 -0400 (EDT) Message-ID: <Pine.GSO.4.21.0109081832030.24489-100000@crusoe.crusoe.net> Subject: [PATCH t/lib/warnings/regcomp] (?=...)? gives no warning now From: "Jeff 'japhy/Marillion' Pinyan" <jeffp@crusoe.net> Date: Sat, 8 Sep 2001 18:37:22 -0400 (EDT) Message-ID: <Pine.GSO.4.21.0109081835340.24489-100000@crusoe.crusoe.net> p4raw-id: //depot/perl@11956
Diffstat (limited to 't')
-rw-r--r--t/lib/warnings/regcomp9
-rw-r--r--t/run/kill_perl.t2
2 files changed, 0 insertions, 11 deletions
diff --git a/t/lib/warnings/regcomp b/t/lib/warnings/regcomp
index ceca4410d6..b9cbecca9a 100644
--- a/t/lib/warnings/regcomp
+++ b/t/lib/warnings/regcomp
@@ -47,15 +47,6 @@ $a =~ /(?=a)*/ ;
EXPECT
(?=a)* matches null string many times in regex; marked by <-- HERE in m/(?=a)* <-- HERE / at - line 4.
########
-# regcomp.c [S_study_chunk]
-use warnings 'regexp' ;
-$_ = "" ;
-/(?=a)?/;
-no warnings 'regexp' ;
-/(?=a)?/;
-EXPECT
-Quantifier unexpected on zero-length expression in regex; marked by <-- HERE in m/(?=a)? <-- HERE / at - line 4.
-########
# regcomp.c [S_regatom]
$x = '\m' ;
use warnings 'regexp' ;
diff --git a/t/run/kill_perl.t b/t/run/kill_perl.t
index d782bb3c58..225208e7f6 100644
--- a/t/run/kill_perl.t
+++ b/t/run/kill_perl.t
@@ -724,8 +724,6 @@ EXPECT
########
-w
"x" =~ /(\G?x)?/; # core dump in 20000716.007
-EXPECT
-Quantifier unexpected on zero-length expression in regex; marked by <-- HERE in m/(\G?x)? <-- HERE / at - line 2.
########
# Bug 20010515.004
my @h = 1 .. 10;