From 9e55ce066d52428ee12b0c4df544c9a64f88c082 Mon Sep 17 00:00:00 2001
From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Sat, 5 Jan 2002 22:09:20 +0000
Subject: Finish up (ha!) the Unicode case folding; enhance regex dumping code.

p4raw-id: //depot/perl@14096
---
 t/op/pat.t | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 't/op/pat.t')

diff --git a/t/op/pat.t b/t/op/pat.t
index bc2ed375ab..a504186332 100755
--- a/t/op/pat.t
+++ b/t/op/pat.t
@@ -2602,7 +2602,8 @@ print "# some Unicode properties\n";
     print "SS" =~
 	/\N{LATIN SMALL LETTER SHARP S}/i   ? "ok 840\n" : "not ok 840\n";
 
-# Fix coming up.
+# These are a bit tricky.  Since the LATIN SMALL LETTER SHARP S is U+00DF,
+# the ANYOF reduces to a byte.  The Unicodeness needs to be caught earlier.
 #    print "ss" =~
 #	/[\N{LATIN SMALL LETTER SHARP S}]/i ? "ok 841\n" : "not ok 841\n";
 #
-- 
cgit v1.2.1