X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=dosish.h;h=c41d9a721d4ebcae3975c9eec42d890c264401c5;hb=a922f900a6916d70770b1348cbacd5ea3df02a9f;hp=86284725a381edfd0ce8da31aa060ee7c692a270;hpb=7e4e8c89c9cf9e2712eede00d12c71677e17b929;p=p5sagit%2Fp5-mst-13.2.git diff --git a/dosish.h b/dosish.h index 8628472..c41d9a7 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*); @@ -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