From: Dave Mitchell <davem@fdisolutions.com>
Date: Thu, 13 Apr 2006 17:16:41 +0000 (+0000)
Subject: disable 'split /(?{ split "" })/' test until recursive split is fixed
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=36daacbf16af0fc5c17305125bd7b7f77f173066;p=p5sagit%2Fp5-mst-13.2.git

disable 'split /(?{ split "" })/' test until recursive split is fixed

p4raw-id: //depot/perl@27793
---

diff --git a/t/op/pat.t b/t/op/pat.t
index 44070b4..0b5c1a5 100755
--- a/t/op/pat.t
+++ b/t/op/pat.t
@@ -3181,7 +3181,10 @@ ok("bbbbac" =~ /$pattern/ && $1 eq 'a', "[perl #3547]");
 }
 
 {
-    split /(?{ split "" })/, "abc";
+    # XXX DAPM 13-Apr-06. Recursive split is still broken. It's only luck it
+    # hasn't been crashing. Disable this test until it is fixed properly.
+    # XXX also check what it returns rather than just doing ok(1,...)
+    # split /(?{ split "" })/, "abc";
     ok(1,'cache_re & "(?{": it dumps core in 5.6.1 & 5.8.0');
 }