[Git][ghc/ghc][wip/T25281] One more

[Simon Peyton Jones (@simonpj)]

Simon Peyton Jones pushed to branch wip/T25281 at Glasgow Haskell Compiler / GHC


Commits:
1fc154cc by Simon Peyton Jones at 2024-10-06T17:01:02+01:00
One more

- - - - -


1 changed file:

- compiler/GHC/Iface/Ext/Ast.hs


Changes:

=====================================
compiler/GHC/Iface/Ext/Ast.hs
=====================================
@@ -939,7 +939,7 @@ instance HiePass p => ToHie (Located (PatSynBind (GhcPass p) (GhcPass p))) where
             (PrefixCon _ args) -> foldr combineScopes NoScope $ map mkScope args
             (InfixCon a b) -> combineScopes (mkScope a) (mkScope b)
             (RecCon r) -> foldr go NoScope r
-          go (RecordPatSynField a b) c = combineScopes c
+          go (RecordPatSynField (a :: FieldOcc (GhcPass p)) b) c = combineScopes c
             $ combineScopes (mkScope (foLabel a)) (mkScope b)
           detSpan = case detScope of
             LocalScope a -> Just a



View it on GitLab: https://gitlab.haskell.org/ghc/ghc/-/commit/1fc154cc67b5f0d8928397ba829397bd951993e8

-- 
View it on GitLab: https://gitlab.haskell.org/ghc/ghc/-/commit/1fc154cc67b5f0d8928397ba829397bd951993e8
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/20241006/3ad62e8f/attachment.html>