X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=unixish.h;h=f6923b7f66b0df60103ca866e6754eb8e759427d;hb=ccf874816b57b9b91848a81cf43371bf7b3f17c8;hp=1168d297b6f41306fdf176f30af1bcbd7e5927d1;hpb=534825c439e9bf017f3cdaf88d284d58d5eac6bd;p=p5sagit%2Fp5-mst-13.2.git diff --git a/unixish.h b/unixish.h index 1168d29..f6923b7 100644 --- a/unixish.h +++ b/unixish.h @@ -5,6 +5,8 @@ * here. */ +#ifndef PERL_MICRO + /* HAS_IOCTL: * This symbol, if defined, indicates that the ioctl() routine is * available to set I/O characteristics @@ -33,6 +35,8 @@ #define HAS_KILL #define HAS_WAIT + +#endif /* !PERL_MICRO */ /* USEMYBINMODE * This symbol, if defined, indicates that the program should @@ -125,11 +129,7 @@ # ifdef POSIX_BC # define PERL_SYS_INIT(c,v) sigignore(SIGFPE); MALLOC_INIT # else -# ifdef __CYGWIN__ -# define PERL_SYS_INIT(c,v) Perl_my_setenv_init(&environ); MALLOC_INIT -# else -# define PERL_SYS_INIT(c,v) MALLOC_INIT -# endif +# define PERL_SYS_INIT(c,v) MALLOC_INIT # endif #endif #endif @@ -141,3 +141,6 @@ #define BIT_BUCKET "/dev/null" #define dXSUB_SYS + +#define USE_ENVIRON_ARRAY +