Export mapOL from OrdList

diff --git a/compiler/utils/OrdList.lhs b/compiler/utils/OrdList.lhs
index 3437ee7..74c9ed8 100644 (file)
--- a/compiler/utils/OrdList.lhs
+++ b/compiler/utils/OrdList.lhs
@@ -12,7 +12,7 @@ can be appended in linear time.
 module OrdList (
        OrdList, 
         nilOL, isNilOL, unitOL, appOL, consOL, snocOL, concatOL,
 module OrdList (
        OrdList, 
         nilOL, isNilOL, unitOL, appOL, consOL, snocOL, concatOL,

-        fromOL, toOL, foldrOL, foldlOL
+        mapOL, fromOL, toOL, foldrOL, foldlOL

 ) where
 
 infixl 5  `appOL`
 ) where
 
 infixl 5  `appOL`