Group exports so that all length functions are together; no semantic change

[ghc-hetmet.git] / compiler / utils / Util.lhs

diff --git a/compiler/utils/Util.lhs b/compiler/utils/Util.lhs
index e692ff1..279a108 100644 (file)
--- a/compiler/utils/Util.lhs
+++ b/compiler/utils/Util.lhs
@@ -12,7 +12,10 @@ module Util (
        mapFst, mapSnd,
        mapAndUnzip, mapAndUnzip3,
        nOfThem, filterOut,
-       lengthExceeds, lengthIs, lengthAtLeast, listLengthCmp, atLength,
+
+       lengthExceeds, lengthIs, lengthAtLeast, 
+       listLengthCmp, atLength, equalLength, compareLength,
+
        isSingleton, only, singleton,
        notNull, snocView,
 
@@ -34,7 +37,7 @@ module Util (
        takeList, dropList, splitAtList, split,
 
        -- comparisons
-       isEqual, eqListBy, equalLength, compareLength,
+       isEqual, eqListBy, 
        thenCmp, cmpList, prefixMatch, suffixMatch, maybePrefixMatch,
        removeSpaces,