Fix Array imports

diff --git a/compiler/utils/Digraph.lhs b/compiler/utils/Digraph.lhs
index c49087c..8fda332 100644 (file)
--- a/compiler/utils/Digraph.lhs
+++ b/compiler/utils/Digraph.lhs
@@ -44,7 +44,9 @@ import Array
 import List
 import Outputable
 
-#if __GLASGOW_HASKELL__ >= 504
+#if __GLASGOW_HASKELL__ > 604
+import Data.Array.ST
+#elif __GLASGOW_HASKELL__ >= 504
 import Data.Array.ST  hiding ( indices, bounds )
 #else
 import ST