diff options
Diffstat (limited to 'src/compiler/GF/Infra/UseIO.hs')
| -rw-r--r-- | src/compiler/GF/Infra/UseIO.hs | 3 |
1 files changed, 0 insertions, 3 deletions
diff --git a/src/compiler/GF/Infra/UseIO.hs b/src/compiler/GF/Infra/UseIO.hs index 1240351f6..309b09e46 100644 --- a/src/compiler/GF/Infra/UseIO.hs +++ b/src/compiler/GF/Infra/UseIO.hs @@ -158,9 +158,6 @@ foldIOE f s xs = case xs of Ok v -> foldIOE f v xx Bad m -> return $ (s, Just m) -dieIOE :: IOE a -> IO a -dieIOE x = appIOE x >>= err die return - die :: String -> IO a die s = do hPutStrLn stderr s exitFailure |