From 0efe9bd77f47f80cef7f10c435ea9efcda10d2b0 Mon Sep 17 00:00:00 2001 From: Duncan Coutts Date: Thu, 11 Jun 2009 16:59:05 +0000 Subject: [PATCH] Add missing StgPrimCallOp case in repCCallConv We don't handle "foreign import prim" in TH stuff. --- compiler/deSugar/DsMeta.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/compiler/deSugar/DsMeta.hs b/compiler/deSugar/DsMeta.hs index 9aac831..2b982b3 100644 --- a/compiler/deSugar/DsMeta.hs +++ b/compiler/deSugar/DsMeta.hs @@ -358,7 +358,7 @@ repForD decl = notHandled "Foreign declaration" (ppr decl) repCCallConv :: CCallConv -> DsM (Core TH.Callconv) repCCallConv CCallConv = rep2 cCallName [] repCCallConv StdCallConv = rep2 stdCallName [] -repCCallConv CmmCallConv = notHandled "repCCallConv" (ppr CmmCallConv) +repCCallConv callConv = notHandled "repCCallConv" (ppr callConv) repSafety :: Safety -> DsM (Core TH.Safety) repSafety PlayRisky = rep2 unsafeName [] -- 1.7.10.4