diff options
| author | Ian Lynagh <igloo@earth.li> | 2012-05-22 14:01:01 +0100 |
|---|---|---|
| committer | Ian Lynagh <igloo@earth.li> | 2012-05-22 14:01:01 +0100 |
| commit | 285a5e21d74ece5dcf4b8d041aee68d9f862080c (patch) | |
| tree | 332af29a01c9b12988b953f0409feb2a89f04537 | |
| parent | 6994ed9daebb24ffb9142305394035f5f1d1ae91 (diff) | |
| download | haskell-285a5e21d74ece5dcf4b8d041aee68d9f862080c.tar.gz | |
Fix warning
| -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 38ee6fc19d..e7bf11c117 100644 --- a/compiler/utils/Panic.lhs +++ b/compiler/utils/Panic.lhs @@ -310,6 +310,6 @@ popInterruptTargetThread :: IO () popInterruptTargetThread = modifyMVar_ interruptTargetThread $ \tids -> return $! case tids of [] -> [] - (t:ts) -> ts + (_:ts) -> ts \end{code} |