X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=dosish.h;h=94a15afe90fc988cd259affd412b948dbb2ac74d;hb=f3c90b3644a4d1b01ee1a6fe678bc1357e85a56a;hp=1e4a58b96877932d0494ab13afc9a28c0eead405;hpb=7da0e3835572d02b95a50131e2eb75d6ecad02e5;p=p5sagit%2Fp5-mst-13.2.git diff --git a/dosish.h b/dosish.h index 1e4a58b..94a15af 100644 --- a/dosish.h +++ b/dosish.h @@ -18,7 +18,6 @@ # define OP_BINARY O_BINARY # define PERL_SYS_INIT(c,v) MALLOC_CHECK_TAINT2(*c,*v) Perl_DJGPP_init(c,v) # define init_os_extras Perl_init_os_extras -# include # define HAS_UTIME # define HAS_KILL char *djgpp_pathexp (const char*); @@ -44,7 +43,7 @@ #endif /* DJGPP */ #ifndef PERL_SYS_TERM -# define PERL_SYS_TERM() OP_REFCNT_TERM; MALLOC_TERM +# define PERL_SYS_TERM() HINTS_REFCNT_TERM; OP_REFCNT_TERM; MALLOC_TERM #endif #define dXSUB_SYS @@ -60,9 +59,9 @@ * if you need the last, try #DEFINE MEM_SIZE unsigned long. */ #ifdef MSDOS - #ifndef DJGPP - #define HAS_64K_LIMIT - #endif +# ifndef DJGPP +# define HAS_64K_LIMIT +# endif #endif /* USEMYBINMODE @@ -80,7 +79,12 @@ * information. */ #if defined(WIN64) || defined(USE_LARGE_FILES) +# if defined(__BORLANDC__) /* buk */ +# include +# define Stat_t struct stati64 +# else #define Stat_t struct _stati64 +# endif #else #if defined(UNDER_CE) #define Stat_t struct xcestat @@ -114,6 +118,8 @@ */ /* #define ALTERNATE_SHEBANG "#!" / **/ +#include + /* * fwrite1() should be a routine with the same calling sequence as fwrite(), * but which outputs all of the bytes requested as a single stream (unlike