diff options
| author | Max Bolingbroke <batterseapower@hotmail.com> | 2009-07-01 20:03:44 +0000 |
|---|---|---|
| committer | Max Bolingbroke <batterseapower@hotmail.com> | 2009-07-01 20:03:44 +0000 |
| commit | 9d0c8f842e35dde3d570580cf62a32779f66a6de (patch) | |
| tree | dbe3743f4ff24c8d4ed7129c780b179275e3748e /utils/hpc | |
| parent | ab1d5052de53479377c961d1e966f0cf0b82c592 (diff) | |
| download | haskell-9d0c8f842e35dde3d570580cf62a32779f66a6de.tar.gz | |
Support for -fwarn-unused-do-bind and -fwarn-wrong-do-bind, as per #3263
Diffstat (limited to 'utils/hpc')
| -rw-r--r-- | utils/hpc/Main.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/utils/hpc/Main.hs b/utils/hpc/Main.hs index da859d0345..419a519a59 100644 --- a/utils/hpc/Main.hs +++ b/utils/hpc/Main.hs @@ -56,7 +56,7 @@ dispatch (txt:args0) = do case getOpt Permute (options plugin []) args of (_,_,errs) | not (null errs) -> do putStrLn "hpc failed:" - sequence [ putStr (" " ++ err) + sequence_ [ putStr (" " ++ err) | err <- errs ] putStrLn $ "\n" |