[MLton-commit] r4724

Matthew Fluet fluet at mlton.org
Wed Oct 18 13:49:10 PDT 2006


Formatting
----------------------------------------------------------------------

U   mlton/branches/on-20050822-x86_64-branch/runtime/basis/Real/Math-fns.h

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

Modified: mlton/branches/on-20050822-x86_64-branch/runtime/basis/Real/Math-fns.h
===================================================================
--- mlton/branches/on-20050822-x86_64-branch/runtime/basis/Real/Math-fns.h	2006-10-18 14:23:59 UTC (rev 4723)
+++ mlton/branches/on-20050822-x86_64-branch/runtime/basis/Real/Math-fns.h	2006-10-18 20:49:01 UTC (rev 4724)
@@ -90,7 +90,7 @@
 #if (defined (__hppa__) || defined (__sparc__))
 #define binaryRealRealRef(g, h)                                         \
   MLTON_CODEGEN_MATHFN(Real32_t h##f (Real32_t x, Real32_t *yp);)       \
-    MLTON_CODEGEN_STATIC_INLINE                                         \
+  MLTON_CODEGEN_STATIC_INLINE                                           \
   Real32_t Real32_##g (Real32_t x, Ref(Real32_t) yp) {                  \
     /* Real32_t r, res; */                                              \
     /* r = Real32_fetch (yp); */                                        \
@@ -116,7 +116,7 @@
     return h##f (x, (Real32_t*)yp);                                     \
   }                                                                     \
   MLTON_CODEGEN_MATHFN(Real64_t h (Real64_t x, Real64_t *yp);)          \
-  MLTON_CODEGEN_STATIC_INLINE                                           \
+    MLTON_CODEGEN_STATIC_INLINE                                         \
   Real64_t Real64_##g (Real64_t x, Ref(Real64_t) yp) {                  \
     return h (x, (Real64_t*)yp);                                        \
   }




More information about the MLton-commit mailing list