diff options
author | Alexander Biehl <alexbiehl@gmail.com> | 2017-08-11 08:29:23 +0200 |
---|---|---|
committer | Ben Gamari <ben@smart-cactus.org> | 2017-08-17 16:42:55 -0400 |
commit | 03327bf049acb595c3ba034d16ee5bd0afabe7c4 (patch) | |
tree | f0bd219849737b0f4cb9785daa9fdd4549c42f9b | |
parent | af9f3fabd72a8b2d627c1360a5c8fc1925f2145d (diff) | |
download | haskell-03327bf049acb595c3ba034d16ee5bd0afabe7c4.tar.gz |
Handle ListPat in isStrictPattern
This fixes #14105.
-rw-r--r-- | compiler/rename/RnExpr.hs | 1 |
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 |