[MLton-commit] r5589

[Vesa Karvonen]

SML/NJ support.

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

A   mltonlib/trunk/com/ssh/prettier/unstable/detail/ml/
A   mltonlib/trunk/com/ssh/prettier/unstable/detail/ml/smlnj/
A   mltonlib/trunk/com/ssh/prettier/unstable/detail/ml/smlnj/unsealed.cm
U   mltonlib/trunk/com/ssh/prettier/unstable/detail/prettier.sml
A   mltonlib/trunk/com/ssh/prettier/unstable/lib.cm

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

Added: mltonlib/trunk/com/ssh/prettier/unstable/detail/ml/smlnj/unsealed.cm
===================================================================
--- mltonlib/trunk/com/ssh/prettier/unstable/detail/ml/smlnj/unsealed.cm	2007-06-06 07:10:13 UTC (rev 5588)
+++ mltonlib/trunk/com/ssh/prettier/unstable/detail/ml/smlnj/unsealed.cm	2007-06-06 07:16:33 UTC (rev 5589)
@@ -0,0 +1,10 @@
+(* Copyright (C) 2007 SSH Communications Security, Helsinki, Finland
+ *
+ * This code is released under the MLton license, a BSD-style license.
+ * See the LICENSE file or http://mlton.org/License for details.
+ *)
+
+group is
+  ../../prettier.sml
+  ../../../public/prettier.sig
+  ../../../../../extended-basis/unstable/basis.cm

Modified: mltonlib/trunk/com/ssh/prettier/unstable/detail/prettier.sml
===================================================================
--- mltonlib/trunk/com/ssh/prettier/unstable/detail/prettier.sml	2007-06-06 07:10:13 UTC (rev 5588)
+++ mltonlib/trunk/com/ssh/prettier/unstable/detail/prettier.sml	2007-06-06 07:16:33 UTC (rev 5589)
@@ -5,6 +5,13 @@
  *)
 
 structure Prettier :> PRETTIER = struct
+   (* <-- SML/NJ workaround *)
+   open Basic Fn Lazy
+   infix  4 <\
+   infixr 2 |<
+   val map = List.map
+   (* SML/NJ workaround --> *)
+
    structure C = Char and S = String and SS = Substring
 
    infixr 7 <^> <+>

Added: mltonlib/trunk/com/ssh/prettier/unstable/lib.cm
===================================================================
--- mltonlib/trunk/com/ssh/prettier/unstable/lib.cm	2007-06-06 07:10:13 UTC (rev 5588)
+++ mltonlib/trunk/com/ssh/prettier/unstable/lib.cm	2007-06-06 07:16:33 UTC (rev 5589)
@@ -0,0 +1,11 @@
+(* Copyright (C) 2007 SSH Communications Security, Helsinki, Finland
+ *
+ * This code is released under the MLton license, a BSD-style license.
+ * See the LICENSE file or http://mlton.org/License for details.
+ *)
+
+library
+   source(public/export.sml)
+is
+   public/export.sml
+   detail/ml/smlnj/unsealed.cm