summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorAlexander Biehl <alexbiehl@gmail.com>2017-08-11 08:29:23 +0200
committerBen Gamari <ben@smart-cactus.org>2017-08-17 16:42:55 -0400
commit03327bf049acb595c3ba034d16ee5bd0afabe7c4 (patch)
treef0bd219849737b0f4cb9785daa9fdd4549c42f9b
parentaf9f3fabd72a8b2d627c1360a5c8fc1925f2145d (diff)
downloadhaskell-03327bf049acb595c3ba034d16ee5bd0afabe7c4.tar.gz
Handle ListPat in isStrictPattern
This fixes #14105.
-rw-r--r--compiler/rename/RnExpr.hs1
1 files changed, 1 insertions, 0 deletions
diff --git a/compiler/rename/RnExpr.hs b/compiler/rename/RnExpr.hs
index 6eabc8969d..3e5c88fe7f 100644
--- a/compiler/rename/RnExpr.hs
+++ b/compiler/rename/RnExpr.hs
@@ -1767,6 +1767,7 @@ isStrictPattern (L _ pat) =
SigPatIn p _ -> isStrictPattern p
SigPatOut p _ -> isStrictPattern p
BangPat{} -> True
+ ListPat{} -> True
TuplePat{} -> True
SumPat{} -> True
PArrPat{} -> True