diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2001-06-24 13:21:23 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-06-24 13:21:23 +0000 |
| commit | c77b533b28c0662914d761b264c2238f98d272a4 (patch) | |
| tree | 82eb19c8936475bee43cb1755354fe92e5a8a108 /unixish.h | |
| parent | 9faf41b626b963edb80798c7c7738bc20834dda2 (diff) | |
| download | perl-c77b533b28c0662914d761b264c2238f98d272a4.tar.gz | |
Factor the PERL_SYS_INIT() code, from Hugo van der Sanden.
p4raw-id: //depot/perl@10888
Diffstat (limited to 'unixish.h')
| -rw-r--r-- | unixish.h | 18 |
1 files changed, 1 insertions, 17 deletions
@@ -118,24 +118,8 @@ #define Fflush(fp) fflush(fp) #define Mkdir(path,mode) mkdir((path),(mode)) -/* these should be set in a hint file, not here */ #ifndef PERL_SYS_INIT -#if defined(PERL_SCO5) || defined(__FreeBSD__) -# ifdef __FreeBSD__ -# include <floatingpoint.h> -# endif -# define PERL_SYS_INIT(c,v) fpsetmask(0); MALLOC_INIT -#else -# ifdef POSIX_BC -# define PERL_SYS_INIT(c,v) sigignore(SIGFPE); MALLOC_INIT -# else -# ifdef UTS -# define PERL_SYS_INIT(c,v) signal(SIGFPE, SIG_IGN); MALLOC_INIT -# else -# define PERL_SYS_INIT(c,v) MALLOC_INIT -# endif -# endif -#endif +# define PERL_SYS_INIT(c,v) PERL_FPU_INIT MALLOC_INIT #endif #ifndef PERL_SYS_TERM |