diff options
| author | Gurusamy Sarathy <gsar@engin.umich.edu> | 1997-07-24 21:58:46 +1200 |
|---|---|---|
| committer | Tim Bunce <Tim.Bunce@ig.co.uk> | 1997-08-07 00:00:00 +1200 |
| commit | ad2e33dc060dc2ccf73a5ff1557a69a9b09c30c8 (patch) | |
| tree | 0e670241aa4a1689b0d301eca76b27617e948922 /dosish.h | |
| parent | 156a3eb7d0abfe7f8bcb0a4ba81b9e48f1777ab9 (diff) | |
| download | perl-ad2e33dc060dc2ccf73a5ff1557a69a9b09c30c8.tar.gz | |
win32 extras and embedding
This patch makes the various Win32-specific builtins available
in embedded perl.
It also fixes a problem with FP errors thrown by the Borland
runtime when doing something like C<perl -e "print(1.0e+26 % 1">.
The VC runtime doesn't throw those errors because FP errors are
off by default in VC, on in Borland. The patch adds code to always
turn them off. (This should ultimately be made user-settable via
$SIG{FPE}, when we have more robust signal handling).
I've also made Borland builds use gcvt(), which is available there,
and is much faster than sprintf().
Most of the size of the patch comes from moved code.
[editor's note: some of these changes are being applied in the wrong
order and changing slightly]
p5p-msgid: 199707250232.WAA03421@aatma.engin.umich.edu
Diffstat (limited to 'dosish.h')
| -rw-r--r-- | dosish.h | 3 |
1 files changed, 2 insertions, 1 deletions
@@ -11,10 +11,11 @@ void Perl_DJGPP_init(); # define PERL_SYS_INIT(argcp, argvp) STMT_START { \ Perl_DJGPP_init(); } STMT_END #else /* DJGPP */ -# define PERL_SYS_INIT(c,v) # ifdef WIN32 +# define PERL_SYS_INIT(c,v) Perl_win32_init(c,v) # define BIT_BUCKET "nul" # else +# define PERL_SYS_INIT(c,v) # define BIT_BUCKET "\\dev\\nul" /* "wanna be like, umm, Newlined, or somethin?" */ # endif #endif /* DJGPP */ |