X-Git-Url: https://perl5.git.perl.org/perl5.git/blobdiff_plain/f89d6eaa35318513fcfc9665bbb2d0bcea3326ee..7506f9c3f6b048fdb2fd155faf2d2e318605503c:/dosish.h diff --git a/dosish.h b/dosish.h index 4056606..7e72d67 100644 --- a/dosish.h +++ b/dosish.h @@ -8,6 +8,7 @@ # define BIT_BUCKET "nul" # define OP_BINARY O_BINARY # define PERL_SYS_INIT(c,v) Perl_DJGPP_init(c,v) +# define init_os_extras Perl_init_os_extras # include # define HAS_UTIME # define HAS_KILL @@ -23,21 +24,8 @@ # define PERL_SYS_INIT(c,v) Perl_win32_init(c,v) # define BIT_BUCKET "nul" # else -# ifdef CYGWIN32 -# define PERL_SYS_INIT(c,v) \ - MALLOC_INIT; -# define OP_BINARY O_BINARY -# define BIT_BUCKET "nul" -# define HAS_IOCTL -# define HAS_UTIME -# define HAS_KILL -# define HAS_WAIT -# define HAS_CHOWN -# define HAS_GROUP -# else -# define PERL_SYS_INIT(c,v) -# define BIT_BUCKET "\\dev\\nul" /* "wanna be like, umm, Newlined, or somethin?" */ -# endif +# define PERL_SYS_INIT(c,v) +# define BIT_BUCKET "\\dev\\nul" /* "wanna be like, umm, Newlined, or somethin?" */ # endif #endif /* DJGPP */ @@ -123,13 +111,4 @@ # define HAS_KILL # define HAS_WAIT # define HAS_CHOWN -/* - * This provides a layer of functions and macros to ensure extensions will - * get to use the same RTL functions as the core. - */ -# ifndef HASATTRIBUTE -# ifndef PERL_OBJECT -# include -# endif -# endif #endif /* WIN32 */