diff options
| author | Thomas Dorner <Thomas.Dorner@start.de> | 1998-09-29 14:29:36 +0100 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 1998-10-17 14:49:46 +0000 |
| commit | a1a0e61e30ae0c76c1d9cbf46512c19c0a966791 (patch) | |
| tree | 87df3aae4267240a5d481ebb6ffe2eb12fe14667 /unixish.h | |
| parent | 5b7e2fe55885acf170d7496132b9ef976ea5c02b (diff) | |
| download | perl-a1a0e61e30ae0c76c1d9cbf46512c19c0a966791.tar.gz | |
POSIX BC2000 port from perl-mvs:
Subject: Ported perl 5.005.02 to BS2000 / POSIX
Message-ID: <9CE47B416A24D2118BC40000F84009B20B72C5@start.de>
p4raw-id: //depot/cfgperl@2009
Diffstat (limited to 'unixish.h')
| -rw-r--r-- | unixish.h | 8 |
1 files changed, 6 insertions, 2 deletions
@@ -114,12 +114,16 @@ #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 #ifdef PERL_SCO5 -/* this should be set in a hint file, not here */ # define PERL_SYS_INIT(c,v) fpsetmask(0); MALLOC_INIT #else -# define PERL_SYS_INIT(c,v) MALLOC_INIT +# ifdef POSIX_BC +# define PERL_SYS_INIT(c,v) sigignore(SIGFPE); MALLOC_INIT +# else +# define PERL_SYS_INIT(c,v) MALLOC_INIT +# endif #endif #endif |