From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Wed, 7 Jul 1999 13:38:02 +0000 (+0000)
Subject: Sync regcomp warn with reality.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=e8c223dfc7b1035dd59e72c90f29f3f8b0634423;p=p5sagit%2Fp5-mst-13.2.git

Sync regcomp warn with reality.

p4raw-id: //depot/cfgperl@3649
---

diff --git a/t/pragma/warn/regcomp b/t/pragma/warn/regcomp
index f67fafa..6545778 100644
--- a/t/pragma/warn/regcomp
+++ b/t/pragma/warn/regcomp
@@ -33,16 +33,29 @@ Strange *+?{} on zero-length expression at - line 4.
 # regcomp.c
 use warning 'unsafe' ;
 $_ = "" ;
-/[:foo:]/;
+/[:alpha:]/;
 /[.bar.]/;
 /[=zog=]/;
+/[[:alpha:]]/;
+/[[.foo.]]/;
+/[[=bar=]]/;
+/[:zog:]/;
 no warning 'unsafe' ;
-/[a[:foo:]b]/;
-/[a[.bar.]b]/;
-/[a[=zog=]b]/;
+/[:alpha:]/;
+/[.foo.]/;
+/[=bar=]/;
+/[[:alpha:]]/;
+/[[.foo.]]/;
+/[[=bar=]]/;
+/[:zog:]/;
+/[[:zog:]]/;
 EXPECT
 Character class syntax [: :] belongs inside character classes at - line 4.
 Character class syntax [. .] belongs inside character classes at - line 5.
 Character class syntax [. .] is reserved for future extensions at - line 5.
 Character class syntax [= =] belongs inside character classes at - line 6.
 Character class syntax [= =] is reserved for future extensions at - line 6.
+Character class syntax [. .] is reserved for future extensions at - line 8.
+Character class syntax [= =] is reserved for future extensions at - line 9.
+Character class syntax [: :] belongs inside character classes at - line 10.
+Character class [:zog:] unknown at - line 19.