diff options
| -rw-r--r-- | compiler/main/HeaderInfo.hs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/compiler/main/HeaderInfo.hs b/compiler/main/HeaderInfo.hs index 156613773e..dc97e20544 100644 --- a/compiler/main/HeaderInfo.hs +++ b/compiler/main/HeaderInfo.hs @@ -92,7 +92,8 @@ getImpMod (ImportDecl located_mod _ _ _ _) = located_mod getOptionsFromFile :: FilePath -- input file -> IO [Located String] -- options, if any getOptionsFromFile filename - = bracket (openBinaryFile filename ReadMode) + = System.IO.bracket + (openBinaryFile filename ReadMode) (hClose) (\handle -> do buf <- hGetStringBufferBlock handle blockSize |