[MLton-commit] r5031

[Vesa K. <ve...@ml...>]

Initial commit of a lib of misc utils to be refactored.
----------------------------------------------------------------------

A   mltonlib/trunk/com/ssh/misc-util/unstable/infixes.sml

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

Added: mltonlib/trunk/com/ssh/misc-util/unstable/infixes.sml
===================================================================
--- mltonlib/trunk/com/ssh/misc-util/unstable/infixes.sml	2007-01-12 12:27:36 UTC (rev 5030)
+++ mltonlib/trunk/com/ssh/misc-util/unstable/infixes.sml	2007-01-12 12:27:50 UTC (rev 5031)
@@ -0,0 +1,26 @@
+(* 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.
+ *)
+
+(*
+ * Global operator precedence table.
+ *
+ * We assume here the modified precedence table of the extended basis library.
+ *)
+
+(* ************************************************************************** *)
+(*       !  Prettier !                                                        *)
+(* ========================================================================== *)
+infix  7 !           ! |`
+(* ========================================================================== *)
+infixr 7 ! <^> <+>   !
+(* ========================================================================== *)
+infixr 6 ! <$> <$$>  !
+         ! </> <//>  !
+(* ========================================================================== *)
+infix  1 ! <-        ! += -=
+(* ************************************************************************** *)
+
+nonfix ! (* We just used ! above as a visual separator. *)


Property changes on: mltonlib/trunk/com/ssh/misc-util/unstable/infixes.sml
___________________________________________________________________
Name: svn:eol-style
   + native