/*
- * Copyright © 2001 Novell, Inc. All Rights Reserved.
+ * Copyright © 2001 Novell, Inc. All Rights Reserved.
*
* You may distribute under the terms of either the GNU General Public
* License or the Artistic License, as specified in the README file.
#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