From: Ian Lynagh Date: Sun, 13 Apr 2008 10:31:20 +0000 (+0000) Subject: Remove a warning X-Git-Tag: 2008-05-28~193 X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=commitdiff_plain;h=e1c0a74bf3954b7d255933ec82fa8f7d5d72b760 Remove a warning --- diff --git a/compiler/prelude/ForeignCall.lhs b/compiler/prelude/ForeignCall.lhs index df30934..a80900e 100644 --- a/compiler/prelude/ForeignCall.lhs +++ b/compiler/prelude/ForeignCall.lhs @@ -116,7 +116,7 @@ data CCallTarget isDynamicTarget :: CCallTarget -> Bool isDynamicTarget DynamicTarget = True -isDynamicTarget other = False +isDynamicTarget _ = False \end{code}