From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Tue, 11 Mar 2003 09:19:54 +0000 (+0000)
Subject: Be more lax about the out of memory error message.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=d39768499da99326f8ba53c159f9e35346473a2d;p=p5sagit%2Fp5-mst-13.2.git

Be more lax about the out of memory error message.

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

diff --git a/t/op/recurse.t b/t/op/recurse.t
index af87512..66c33ef 100755
--- a/t/op/recurse.t
+++ b/t/op/recurse.t
@@ -123,7 +123,7 @@ is(takeuchi($x, $y, $z), $z + 1, "takeuchi($x, $y, $z) == $z + 1");
     };
   SKIP: {
       skip("Out of memory -- increase your data/heap?", 2)
-	  if $r =~ /Out of memory!/;
+	  if $r =~ /Out of memory/i;
       is($r, '', "64K deep recursion - no output expected");
       is($?,  0, "64K deep recursion - no coredump expected");
   }