[MLton-commit] r5522
    geoffw at mlton.org 
    geoffw at mlton.org
       
    Fri Apr 13 08:13:53 PDT 2007
    
    
  
Cleaned up parenthesis
----------------------------------------------------------------------
U   mltonlib/trunk/com/ssh/extended-basis/unstable/detail/sequence/list.sml
----------------------------------------------------------------------
Modified: mltonlib/trunk/com/ssh/extended-basis/unstable/detail/sequence/list.sml
===================================================================
--- mltonlib/trunk/com/ssh/extended-basis/unstable/detail/sequence/list.sml	2007-04-13 15:11:47 UTC (rev 5521)
+++ mltonlib/trunk/com/ssh/extended-basis/unstable/detail/sequence/list.sml	2007-04-13 15:13:52 UTC (rev 5522)
@@ -101,7 +101,7 @@
        case xs
          of [] => true
           | x::xs' => 
-            (not o (exists) (Fn.curry eq x)) xs' andalso
+            (not o (exists (Fn.curry eq x))) xs' andalso
             uniqueByEq eq xs' 
 
    local
    
    
More information about the MLton-commit
mailing list