summaryrefslogtreecommitdiff
path: root/compiler/codeGen/CgCase.lhs
diff options
context:
space:
mode:
authorMichael D. Adams <t-madams@microsoft.com>2007-06-21 08:40:47 +0000
committerMichael D. Adams <t-madams@microsoft.com>2007-06-21 08:40:47 +0000
commit2955dc83e4cce22ec0da7a2e654e2193814863cc (patch)
treea7e047771886dae55bd0487955ba932ad8c3df19 /compiler/codeGen/CgCase.lhs
parent6c6d815b809da869ce2d98e4edc1f6350876a898 (diff)
downloadhaskell-2955dc83e4cce22ec0da7a2e654e2193814863cc.tar.gz
Removed trailing whitespace
Diffstat (limited to 'compiler/codeGen/CgCase.lhs')
-rw-r--r--compiler/codeGen/CgCase.lhs2
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/codeGen/CgCase.lhs b/compiler/codeGen/CgCase.lhs
index b8f3141a77..abda4dda31 100644
--- a/compiler/codeGen/CgCase.lhs
+++ b/compiler/codeGen/CgCase.lhs
@@ -168,7 +168,7 @@ cgCase (StgOpApp op@(StgFCallOp fcall _) args _)
unsafe_foreign_call
= case fcall of
CCall (CCallSpec _ _ s) -> not (playSafe s)
- _other -> False
+ _other -> False
\end{code}
Special case: scrutinising a non-primitive variable.