[MLton-commit] r6709

Matthew Fluet fluet at mlton.org
Tue Aug 19 15:09:25 PDT 2008


Formatting; eliminate trailing blank lines.
----------------------------------------------------------------------

U   mlton/trunk/runtime/basis-ffi.h
U   mlton/trunk/runtime/gen/basis-ffi.h
U   mlton/trunk/runtime/gen/gen-basis-ffi.sml

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

Modified: mlton/trunk/runtime/basis-ffi.h
===================================================================
--- mlton/trunk/runtime/basis-ffi.h	2008-08-19 21:40:54 UTC (rev 6708)
+++ mlton/trunk/runtime/basis-ffi.h	2008-08-19 22:09:24 UTC (rev 6709)
@@ -1121,4 +1121,3 @@
 INTERNAL Real64_t WordU8_rndToReal64(Word8_t);
 MLTON_CODEGEN_STATIC_INLINE Word8_t WordU8_rshift(Word8_t,Word32_t);
 #endif /* _MLTON_BASIS_FFI_H_ */
-

Modified: mlton/trunk/runtime/gen/basis-ffi.h
===================================================================
--- mlton/trunk/runtime/gen/basis-ffi.h	2008-08-19 21:40:54 UTC (rev 6708)
+++ mlton/trunk/runtime/gen/basis-ffi.h	2008-08-19 22:09:24 UTC (rev 6709)
@@ -1121,4 +1121,3 @@
 INTERNAL Real64_t WordU8_rndToReal64(Word8_t);
 MLTON_CODEGEN_STATIC_INLINE Word8_t WordU8_rshift(Word8_t,Word32_t);
 #endif /* _MLTON_BASIS_FFI_H_ */
-

Modified: mlton/trunk/runtime/gen/gen-basis-ffi.sml
===================================================================
--- mlton/trunk/runtime/gen/gen-basis-ffi.sml	2008-08-19 21:40:54 UTC (rev 6708)
+++ mlton/trunk/runtime/gen/gen-basis-ffi.sml	2008-08-19 22:09:24 UTC (rev 6709)
@@ -1,4 +1,4 @@
-(* Copyright (C) 2004-2006 Henry Cejtin, Matthew Fluet, Suresh
+(* Copyright (C) 2004-2006, 2008 Henry Cejtin, Matthew Fluet, Suresh
  *    Jagannathan, and Stephen Weeks.
  *
  * MLton is released under a BSD-style license.
@@ -344,7 +344,7 @@
       val () = println "#ifndef _MLTON_BASIS_FFI_H_\n"
       val () = println "#define _MLTON_BASIS_FFI_H_\n"
       val () = List.app (fn entry => println (Entry.toC entry)) entries
-      val () = println "#endif /* _MLTON_BASIS_FFI_H_ */\n"
+      val () = println "#endif /* _MLTON_BASIS_FFI_H_ */"
       val () = TextIO.closeOut f
    in
       ()




More information about the MLton-commit mailing list