From: Nick Ing-Simmons <nik@tiuk.ti.com>
Date: Mon, 14 Jan 2002 16:10:54 +0000 (+0000)
Subject: Inverted sense of special-ness of specialCopIO - supposed to
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=b47b7e599cdd7224bc23222ddfd89205dbb5c997;p=p5sagit%2Fp5-mst-13.2.git

Inverted sense of special-ness of specialCopIO - supposed to
be true if value is "special" i.e. NOT an SV.

p4raw-id: //depot/perlio@14257
---

diff --git a/perlio.h b/perlio.h
index b12539d..7d1bc39 100644
--- a/perlio.h
+++ b/perlio.h
@@ -149,7 +149,7 @@ extern void PerlIO_clone(pTHX_ PerlInterpreter *proto, CLONE_PARAMS *param);
 #endif				/* ifndef PERLIO_NOT_STDIO */
 #endif				/* PERLIO_IS_STDIO */
 
-#define specialCopIO(sv) ((sv) != Nullsv)
+#define specialCopIO(sv) ((sv) == Nullsv)
 
 /* ----------- fill in things that have not got #define'd  ---------- */