Use -fno-warn-unused-imports instead of hiding `ord`
authorThomas Miedema <thomasmiedema@gmail.com>
Sat, 4 Jul 2015 16:20:06 +0000 (18:20 +0200)
committerThomas Miedema <thomasmiedema@gmail.com>
Sat, 4 Jul 2015 22:00:16 +0000 (00:00 +0200)
This is more future proof. Maybe later versions of Alex won't `import
Data.Char (ord)` anymore.

compiler/cmm/CmmLex.x
compiler/parser/Lexer.x

index cb71c7d..fca5a1e 100644 (file)
@@ -13,6 +13,7 @@
 {
 {-# OPTIONS_GHC -fno-warn-unused-matches #-}
 {-# OPTIONS_GHC -fno-warn-unused-binds #-}
+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
 {-# OPTIONS_GHC -fno-warn-tabs #-}
 {-# OPTIONS_GHC -fno-warn-missing-signatures #-}
 -- The above warning suppression flags are a temporary kludge.
@@ -37,7 +38,7 @@ import Util
 --import TRACE
 
 import Data.Word
-import Data.Char hiding (ord)
+import Data.Char
 }
 
 $whitechar   = [\ \t\n\r\f\v\xa0] -- \xa0 is Unicode no-break space
index 8e6e67d..df7347e 100644 (file)
@@ -45,6 +45,7 @@
 {-# LANGUAGE BangPatterns #-}
 {-# OPTIONS_GHC -fno-warn-unused-matches #-}
 {-# OPTIONS_GHC -fno-warn-unused-binds #-}
+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
 {-# OPTIONS_GHC -fno-warn-tabs #-}
 {-# OPTIONS_GHC -fno-warn-missing-signatures #-}
 {-# OPTIONS_GHC -fno-warn-overlapping-patterns #-}
@@ -84,7 +85,7 @@ import Control.Applicative
 #endif
 import Control.Monad
 import Data.Bits
-import Data.Char hiding (ord)
+import Data.Char
 import Data.List
 import Data.Maybe
 import Data.Word