From: Nick Ing-Simmons <nik@tiuk.ti.com>
Date: Thu, 2 May 2002 15:18:12 +0000 (+0000)
Subject: Do not build if not using layers
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=57143e73be61ad4ed95e8d5fdc799945c48c8339;p=p5sagit%2Fp5-mst-13.2.git

Do not build if not using layers

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

diff --git a/win32/win32io.c b/win32/win32io.c
index d10adb4..4e61aaa 100644
--- a/win32/win32io.c
+++ b/win32/win32io.c
@@ -10,11 +10,15 @@
 #include <sys/stat.h>
 #include "EXTERN.h"
 #include "perl.h"
+
+#ifdef PERLIO_LAYERS
+
 #include "perliol.h"
 
 #define NO_XSLOCKS
 #include "XSUB.h"
 
+
 /* Bottom-most level for Win32 case */
 
 typedef struct
@@ -359,5 +363,5 @@ PerlIO_funcs PerlIO_win32 = {
  NULL, /* set_ptrcnt */
 };
 
-
+#endif