[Git][ghc/ghc][wip/ttg-con-pat] Fix T6145 (ConPatIn became ConPat)
cgibbard
gitlab at gitlab.haskell.org
Fri Apr 10 16:48:41 UTC 2020
cgibbard pushed to branch wip/ttg-con-pat at Glasgow Haskell Compiler / GHC
Commits:
9df7797f by Cale Gibbard at 2020-04-10T12:48:34-04:00
Fix T6145 (ConPatIn became ConPat)
- - - - -
1 changed file:
- testsuite/tests/ghc-api/T6145.hs
Changes:
=====================================
testsuite/tests/ghc-api/T6145.hs
=====================================
@@ -39,7 +39,7 @@ main = do
= not (isEmptyBag (filterBag isDataCon bs))
isDataCon (L l (f at FunBind {}))
| (MG _ (L _ (m:_)) _) <- fun_matches f,
- ((L _ (c at ConPatOut{})):_)<-hsLMatchPats m,
+ ((L _ (c at ConPat{})):_)<-hsLMatchPats m,
(L l _)<-pat_con c
= isGoodSrcSpan l -- Check that the source location is a good one
isDataCon _
View it on GitLab: https://gitlab.haskell.org/ghc/ghc/-/commit/9df7797f79bd8e138820e16f550525334080cb89
--
View it on GitLab: https://gitlab.haskell.org/ghc/ghc/-/commit/9df7797f79bd8e138820e16f550525334080cb89
You're receiving this email because of your account on gitlab.haskell.org.
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://mail.haskell.org/pipermail/ghc-commits/attachments/20200410/6e1519b6/attachment.html>
More information about the ghc-commits
mailing list