fix warning

184a5ced · Simon Marlow · 6647f52f · 184a5ced
Commit 184a5ced authored Jul 28, 2009 by Simon Marlow
--- a/compiler/codeGen/CgCase.lhs
+++ b/compiler/codeGen/CgCase.lhs
@@ -192,7 +192,6 @@ cgCase (StgOpApp (StgFCallOp fcall _) args _)
   unsafe_foreign_call
 	 = case fcall of
 	 	CCall (CCallSpec _ _ s) -> not (playSafe s)
-		_other			-> False
 \end{code}

 Special case: scrutinising a non-primitive variable.