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

try again to fix round for solaris

Browse Source 
svn: r8958
This commit is contained in:
Matthew Flatt 2008-03-12 12:45:01 +00:00
parent d1bd680fca
commit bba17def0f
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

@ -1220,7 +1220,7 @@ sch_round (int argc, Scheme_Object *argv[])
int invert; int invert;
#ifdef FMOD_CAN_RETURN_POS_ZERO #ifdef FMOD_CAN_RETURN_POS_ZERO
if (minus_zero_p(d)) if ((d == 0.0) && minus_zero_p(d))
return o; return o;
#endif #endif