diff options
author | Ian Lynagh <igloo@earth.li> | 2009-07-07 18:18:57 +0000 |
---|---|---|
committer | Ian Lynagh <igloo@earth.li> | 2009-07-07 18:18:57 +0000 |
commit | 9721c56a206a342c00d623817a2bb4da77755582 (patch) | |
tree | 1c5221572c7e90e251cbccec8bf43f4d2e64bfbb /compiler/utils/Panic.lhs | |
parent | 2bdd43c25b00a9483b135c9c9f1908642eb3b9de (diff) | |
download | haskell-9721c56a206a342c00d623817a2bb4da77755582.tar.gz |
Fix ignored-monadic-result warnings
Diffstat (limited to 'compiler/utils/Panic.lhs')
-rw-r--r-- | compiler/utils/Panic.lhs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/utils/Panic.lhs b/compiler/utils/Panic.lhs index 4f78aabc24..f4ca2ab97c 100644 --- a/compiler/utils/Panic.lhs +++ b/compiler/utils/Panic.lhs @@ -203,7 +203,7 @@ installSignalHandlers = do sig_handler Break = interrupt sig_handler _ = return () - installHandler (Catch sig_handler) + _ <- installHandler (Catch sig_handler) return () #endif |