[MLton-commit] r6418

[Vesa Karvonen]

Comment out unused WORD64.
----------------------------------------------------------------------

U   mltonlib/trunk/com/ssh/generic/unstable/detail/framework/ty.sml
U   mltonlib/trunk/com/ssh/generic/unstable/public/framework/ty.sig

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

Modified: mltonlib/trunk/com/ssh/generic/unstable/detail/framework/ty.sml
===================================================================
--- mltonlib/trunk/com/ssh/generic/unstable/detail/framework/ty.sml	2008-02-26 11:42:16 UTC (rev 6417)
+++ mltonlib/trunk/com/ssh/generic/unstable/detail/framework/ty.sml	2008-02-26 17:01:39 UTC (rev 6418)
@@ -25,7 +25,7 @@
    structure Con0 = struct
       datatype t = BOOL | CHAR | EXN | FIXED_INT | INT | LARGE_INT
                  | LARGE_REAL | LARGE_WORD | REAL | STRING | UNIT | WORD
-                 | WORD32 | WORD64 | WORD8
+                 | WORD32 (*| WORD64*) | WORD8
    end
 
    structure Con1 = struct

Modified: mltonlib/trunk/com/ssh/generic/unstable/public/framework/ty.sig
===================================================================
--- mltonlib/trunk/com/ssh/generic/unstable/public/framework/ty.sig	2008-02-26 11:42:16 UTC (rev 6417)
+++ mltonlib/trunk/com/ssh/generic/unstable/public/framework/ty.sig	2008-02-26 17:01:39 UTC (rev 6418)
@@ -26,7 +26,7 @@
    structure Con0 : sig
       datatype t = BOOL | CHAR | EXN | FIXED_INT | INT | LARGE_INT
                  | LARGE_REAL | LARGE_WORD | REAL | STRING | UNIT | WORD
-                 | WORD32 | WORD64 | WORD8
+                 | WORD32 (*| WORD64*) | WORD8
    end
 
    structure Con1 : sig