Commit 1bd2c2dc authored by andy@galois.com's avatar andy@galois.com
Browse files

6.4 compatiblity

parent d5934bbb
...@@ -92,7 +92,7 @@ getImpMod (ImportDecl located_mod _ _ _ _) = located_mod ...@@ -92,7 +92,7 @@ getImpMod (ImportDecl located_mod _ _ _ _) = located_mod
getOptionsFromFile :: FilePath -- input file getOptionsFromFile :: FilePath -- input file
-> IO [Located String] -- options, if any -> IO [Located String] -- options, if any
getOptionsFromFile filename getOptionsFromFile filename
= System.IO.bracket = Control.Exception.bracket
(openBinaryFile filename ReadMode) (openBinaryFile filename ReadMode)
(hClose) (hClose)
(\handle -> (\handle ->
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment