[MLton-commit] r4849

[Vesa Karvonen]

Added Exn.
----------------------------------------------------------------------

A   mltonlib/trunk/com/ssh/extended-basis/unstable/detail/smlnj/ext.sml
U   mltonlib/trunk/com/ssh/extended-basis/unstable/detail/smlnj/sigs.cm
U   mltonlib/trunk/com/ssh/extended-basis/unstable/detail/smlnj/unsealed.cm

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

Added: mltonlib/trunk/com/ssh/extended-basis/unstable/detail/smlnj/ext.sml
===================================================================
--- mltonlib/trunk/com/ssh/extended-basis/unstable/detail/smlnj/ext.sml	2006-11-20 19:36:40 UTC (rev 4848)
+++ mltonlib/trunk/com/ssh/extended-basis/unstable/detail/smlnj/ext.sml	2006-11-20 19:44:30 UTC (rev 4849)
@@ -0,0 +1,12 @@
+(* Copyright (C) 2006 SSH Communications Security, Helsinki, Finland
+ *
+ * MLton is released under a BSD-style license.
+ * See the file MLton-LICENSE for details.
+ *)
+
+structure Ext = struct
+   structure Exn = struct
+      fun addMessager _ = ()
+      val history = SMLofNJ.exnHistory
+   end
+end


Property changes on: mltonlib/trunk/com/ssh/extended-basis/unstable/detail/smlnj/ext.sml
___________________________________________________________________
Name: svn:eol-style
   + native

Modified: mltonlib/trunk/com/ssh/extended-basis/unstable/detail/smlnj/sigs.cm
===================================================================
--- mltonlib/trunk/com/ssh/extended-basis/unstable/detail/smlnj/sigs.cm	2006-11-20 19:36:40 UTC (rev 4848)
+++ mltonlib/trunk/com/ssh/extended-basis/unstable/detail/smlnj/sigs.cm	2006-11-20 19:44:30 UTC (rev 4849)
@@ -19,6 +19,7 @@
    ../../public/effect.sig
    ../../public/emb.sig
    ../../public/exit.sig
+   ../../public/exn.sig
    ../../public/fix.sig
    ../../public/fn.sig
    ../../public/int-inf.sig

Modified: mltonlib/trunk/com/ssh/extended-basis/unstable/detail/smlnj/unsealed.cm
===================================================================
--- mltonlib/trunk/com/ssh/extended-basis/unstable/detail/smlnj/unsealed.cm	2006-11-20 19:36:40 UTC (rev 4848)
+++ mltonlib/trunk/com/ssh/extended-basis/unstable/detail/smlnj/unsealed.cm	2006-11-20 19:44:30 UTC (rev 4849)
@@ -20,6 +20,7 @@
    ../effect.sml
    ../emb.sml
    ../exit.sml
+   ../exn.sml
    ../fix.sml
    ../fn.sml
    ../iso.sml
@@ -47,4 +48,5 @@
    ../vector-slice.sml
    ../vector.sml
    ../writer.sml
+   ext.sml
    sigs.cm