For tied file handle calls, use PUSH* when we know that the stack has space.

[p5sagit/p5-mst-13.2.git] / NetWare / nwstdio.h

diff --git a/NetWare/nwstdio.h b/NetWare/nwstdio.h
index 669ba13..4aabb0a 100644 (file)
--- a/NetWare/nwstdio.h
+++ b/NetWare/nwstdio.h
@@ -45,14 +45,14 @@
 #define PerlIO_puts(f,s)                       (*PL_StdIO->pPuts)(PL_StdIO, (f),(s)) 
 #define PerlIO_read(f,buf,size)                (*PL_StdIO->pRead)(PL_StdIO, (buf), (size), 1, (f))
 #define PerlIO_eof(f)                          (*PL_StdIO->pEof)(PL_StdIO, (f)) 
-#define PerlIO_fdupopen(f)                     (*PL_StdIO->pFdupopen)(PL_StdIO, (f))
+//#define PerlIO_fdupopen(f)                   (*PL_StdIO->pFdupopen)(PL_StdIO, (f))
 #define PerlIO_reopen(p,m,f)           (*PL_StdIO->pReopen)(PL_StdIO, (p), (m), (f))
 #define PerlIO_open(x,y)                       (*PL_StdIO->pOpen)(PL_StdIO, (x),(y))
 
 #ifdef HAS_SETLINEBUF
 #define PerlIO_setlinebuf(f)           (*PL_StdIO->pSetlinebuf)(PL_StdIO, (f))
 #else
-#define PerlIO_setlinebuf(f)           setvbuf(f, Nullch, _IOLBF, 0)
+#define PerlIO_setlinebuf(f)           setvbuf(f, NULL, _IOLBF, 0)
 #endif
 
 #define PerlIO_isutf8(f)               0