diff options
| author | Pietro Cerutti <gahr@FreeBSD.org> | 2008-07-08 18:37:44 +0000 |
|---|---|---|
| committer | Pietro Cerutti <gahr@FreeBSD.org> | 2008-07-08 18:37:44 +0000 |
| commit | 284a79c7670a79746ab07256eb24e25928037943 (patch) | |
| tree | 74e23a48be51b002f11f9a8ff316d5c3684d638d /lang/racket-textual/files/patch-src-mzscheme-src_number.c | |
| parent | - Update to 3.0.1 (diff) | |
- New port: plt-scheme
The PLT-Scheme group have released a new version of
their Scheme language and IDE tools suite, and here's a
port that builds it on FreeBSD.
PR: 124776
Submitted by: Andrew Reilly <areilly@bigpond.net.au> (new maintainer)
Notes
Notes:
svn path=/head/; revision=216546
Diffstat (limited to 'lang/racket-textual/files/patch-src-mzscheme-src_number.c')
| -rw-r--r-- | lang/racket-textual/files/patch-src-mzscheme-src_number.c | 26 |
1 files changed, 26 insertions, 0 deletions
diff --git a/lang/racket-textual/files/patch-src-mzscheme-src_number.c b/lang/racket-textual/files/patch-src-mzscheme-src_number.c new file mode 100644 index 000000000000..bbf431bca29d --- /dev/null +++ b/lang/racket-textual/files/patch-src-mzscheme-src_number.c @@ -0,0 +1,26 @@ +--- ../mzscheme/src/number.c.orig 2008-05-07 23:15:18.000000000 +0200 ++++ ../mzscheme/src/number.c 2008-06-27 08:07:23.000000000 +0200 +@@ -52,6 +52,11 @@ + # define MAX_SHIFT_EVER 32 + #endif + ++#include <sys/param.h> ++#include <fenv.h> ++#pragma STDC FENV_ACCESS ON ++ ++ + /* globals */ + double scheme_infinity_val, scheme_minus_infinity_val; + +@@ -152,7 +157,11 @@ + MZ_SIGSET(SIGFPE, SIG_IGN); + #endif + #ifdef FREEBSD_CONTROL_387 ++#if __FreeBSD_version < 800000 + __fpsetreg(FP_MSKS_FLD, FP_MSKS_REG, FP_MSKS_FLD, FP_MSKS_OFF); ++#else ++ fedisableexcept(FE_ALL_EXCEPT); ++#endif + #endif + #ifdef LINUX_CONTROL_387 + __setfpucw(_FPU_EXTENDED + _FPU_RC_NEAREST + 0x3F); |