Print infix function definitions correctly in HsSyn

[ghc-hetmet.git] / compiler / deSugar / DsArrows.lhs

diff --git a/compiler/deSugar/DsArrows.lhs b/compiler/deSugar/DsArrows.lhs
index fc2432d..c44ed59 100644 (file)
--- a/compiler/deSugar/DsArrows.lhs
+++ b/compiler/deSugar/DsArrows.lhs
@@ -42,6 +42,8 @@ import Util
 import HsUtils
 import VarSet
 import SrcLoc
+
+import Data.List
 \end{code}
 
 \begin{code}