Fix a #if test

showMultiLineString is only in >= 7.1.

diff --git a/compiler/utils/Outputable.lhs b/compiler/utils/Outputable.lhs
index 96cf492..d6f950a 100644 (file)
--- a/compiler/utils/Outputable.lhs
+++ b/compiler/utils/Outputable.lhs
@@ -82,7 +82,7 @@ import System.IO      ( Handle, stderr, stdout, hFlush )
 import System.FilePath
 
 
-#if __GLASGOW_HASKELL__ >= 700
+#if __GLASGOW_HASKELL__ >= 701
 import GHC.Show                ( showMultiLineString )
 #else
 showMultiLineString :: String -> [String]