suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

use fpsetmask for freebsd

Browse Source 
svn: r17966
This commit is contained in:
Matthew Flatt 2010-02-04 12:44:58 +00:00
parent a3c9b87652
commit a27dcaa3ac
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/mzscheme/src/number.c
View File

@ -196,7 +196,7 @@ scheme_init_number (Scheme_Env *env)
MZ_SIGSET(SIGFPE, SIG_IGN); MZ_SIGSET(SIGFPE, SIG_IGN);
#endif #endif
#ifdef FREEBSD_CONTROL_387 #ifdef FREEBSD_CONTROL_387
__fpsetreg(FP_MSKS_FLD, FP_MSKS_REG, FP_MSKS_FLD, FP_MSKS_OFF); fpsetmask(0);
#endif #endif
#ifdef LINUX_CONTROL_387 #ifdef LINUX_CONTROL_387
__setfpucw(_FPU_EXTENDED + _FPU_RC_NEAREST + 0x3F); __setfpucw(_FPU_EXTENDED + _FPU_RC_NEAREST + 0x3F);