summaryrefslogtreecommitdiff
path: root/compiler/stranal/WorkWrap.lhs
diff options
context:
space:
mode:
Diffstat (limited to 'compiler/stranal/WorkWrap.lhs')
-rw-r--r--compiler/stranal/WorkWrap.lhs1
1 files changed, 1 insertions, 0 deletions
diff --git a/compiler/stranal/WorkWrap.lhs b/compiler/stranal/WorkWrap.lhs
index 5cf5e92692..ac10b1b773 100644
--- a/compiler/stranal/WorkWrap.lhs
+++ b/compiler/stranal/WorkWrap.lhs
@@ -100,6 +100,7 @@ matching by looking for strict arguments of the correct type.
wwExpr :: CoreExpr -> UniqSM CoreExpr
wwExpr e@(Type {}) = return e
+wwExpr e@(Coercion {}) = return e
wwExpr e@(Lit {}) = return e
wwExpr e@(Var {}) = return e