diff --git a/src/General/Intern.hs b/src/General/Intern.hs index 61253025..8ec25d3e 100644 --- a/src/General/Intern.hs +++ b/src/General/Intern.hs @@ -8,9 +8,9 @@ module General.Intern( import Development.Shake.Classes import Foreign.Storable import Data.Word -import Prelude hiding (lookup) import qualified Data.HashMap.Strict as Map import Data.List(foldl') +import Prelude hiding (lookup) -- Invariant: The first field is the highest value in the Map