[MLton-commit] r4726

Matthew Fluet fluet at mlton.org
Wed Oct 18 14:25:15 PDT 2006


Type name
----------------------------------------------------------------------

U   mlton/branches/on-20050822-x86_64-branch/runtime/basis/Real/IEEEReal.c

----------------------------------------------------------------------

Modified: mlton/branches/on-20050822-x86_64-branch/runtime/basis/Real/IEEEReal.c
===================================================================
--- mlton/branches/on-20050822-x86_64-branch/runtime/basis/Real/IEEEReal.c	2006-10-18 21:17:36 UTC (rev 4725)
+++ mlton/branches/on-20050822-x86_64-branch/runtime/basis/Real/IEEEReal.c	2006-10-18 21:25:13 UTC (rev 4726)
@@ -11,14 +11,14 @@
 #define ROUNDING_CONTROL_MASK 0x0C00
 #define ROUNDING_CONTROL_SHIFT 10
 
-static inline int fegetround (void) {
+static inline C_Int_t fegetround (void) {
         unsigned short controlWord;
 
         _FPU_GETCW (controlWord);
         return (controlWord & ROUNDING_CONTROL_MASK) >> ROUNDING_CONTROL_SHIFT;
 }
 
-static inline void fesetround (int mode) {
+static inline void fesetround (C_Int_t mode) {
         unsigned short controlWord;
 
         _FPU_GETCW (controlWord);




More information about the MLton-commit mailing list