Re: Cross-compiling as of WinCE

[p5sagit/p5-mst-13.2.git] / iperlsys.h

diff --git a/iperlsys.h b/iperlsys.h
index dc43dd5..76a49cd 100644 (file)
--- a/iperlsys.h
+++ b/iperlsys.h
@@ -88,7 +88,13 @@ typedef void         (*LPSetBuf)(struct IPerlStdIO*, FILE*, char*);
 typedef int            (*LPSetVBuf)(struct IPerlStdIO*, FILE*, char*, int,
                            Size_t);
 typedef void           (*LPSetCnt)(struct IPerlStdIO*, FILE*, int);
+
+#ifndef NETWARE
 typedef void           (*LPSetPtr)(struct IPerlStdIO*, FILE*, char*);
+#elif defined(NETWARE)
+typedef void           (*LPSetPtr)(struct IPerlStdIO*, FILE*, char*, int);
+#endif
+
 typedef void           (*LPSetlinebuf)(struct IPerlStdIO*, FILE*);
 typedef int            (*LPPrintf)(struct IPerlStdIO*, FILE*, const char*,
                            ...);
@@ -334,9 +340,9 @@ struct IPerlStdIOInfo
 #define PerlSIO_set_ptr(f,p)           PerlIOProc_abort()
 #endif
 #define PerlSIO_setlinebuf(f)          setlinebuf(f)
-#define PerlSIO_printf                 Perl_fprintf_nocontext
-#define PerlSIO_stdoutf                        *PL_StdIO->pPrintf
-#define PerlSIO_vprintf(f,fmt,a)       
+#define PerlSIO_printf                 fprintf
+#define PerlSIO_stdoutf                        printf
+#define PerlSIO_vprintf(f,fmt,a)       vfprintf(f,fmt,a)
 #define PerlSIO_ftell(f)               ftell(f)
 #define PerlSIO_fseek(f,o,w)           fseek(f,o,w)
 #define PerlSIO_fgetpos(f,p)           fgetpos(f,p)
@@ -803,7 +809,7 @@ struct IPerlMemInfo
 
 /* Shared memory macros */
 #ifdef NETWARE
-  
+
  #define PerlMemShared_malloc(size)                        \
        (*PL_Mem->pMalloc)(PL_Mem, (size))
 #define PerlMemShared_realloc(buf, size)                   \