From: Michael D. Adams Date: Thu, 21 Jun 2007 08:40:47 +0000 (+0000) Subject: Removed trailing whitespace X-Git-Tag: Before_type_family_merge~619 X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=commitdiff_plain;h=2955dc83e4cce22ec0da7a2e654e2193814863cc Removed trailing whitespace --- diff --git a/compiler/codeGen/CgCase.lhs b/compiler/codeGen/CgCase.lhs index b8f3141..abda4dd 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.