From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Thu, 27 Sep 2001 22:23:24 +0000 (+0000)
Subject: Not everyone is using ithreads...
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=898eb5009df4ab2e6ff4bd43f582cd832a2aca6c;p=p5sagit%2Fp5-mst-13.2.git

Not everyone is using ithreads...

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

diff --git a/ext/Devel/Peek/Peek.t b/ext/Devel/Peek/Peek.t
index 9e60bef..dde4cd1 100644
--- a/ext/Devel/Peek/Peek.t
+++ b/ext/Devel/Peek/Peek.t
@@ -321,7 +321,7 @@ do_test(18,
 	chr(256).chr(0).chr(512),
 'SV = PV\\($ADDR\\) at $ADDR
   REFCNT = 1
-  FLAGS = \\(PADBUSY,PADTMP,POK,READONLY,pPOK,UTF8\\)
+  FLAGS = \\((?:PADBUSY,PADTMP,)?POK,READONLY,pPOK,UTF8\\)
   PV = $ADDR "\\\304\\\200\\\0\\\310\\\200"\\\0 \[UTF8 "\\\x\{100\}\\\x\{0\}\\\x\{200\}"\]
   CUR = 5
   LEN = 6');