[Git][ghc/ghc][wip/spj-apporv-Oct24] ignore OrigStmt in addArgCtx

[Apoorv Ingle (@ani)]

Apoorv Ingle pushed to branch wip/spj-apporv-Oct24 at Glasgow Haskell Compiler / GHC


Commits:
04661ec1 by Apoorv Ingle at 2025-01-14T17:26:05-06:00
ignore OrigStmt in addArgCtx

- - - - -


1 changed file:

- compiler/GHC/Tc/Gen/App.hs


Changes:

=====================================
compiler/GHC/Tc/Gen/App.hs
=====================================
@@ -915,6 +915,8 @@ addArgCtxt ctxt (L arg_loc arg) thing_inside
                      addErrCtxt (funAppCtxt fun arg arg_no) $
                      thing_inside
 
+           VAExpansion (OrigStmt{}) _ _ -> setSrcSpanA arg_loc $
+                                       thing_inside -- Do nothing as we have pushed it already
            _ -> setSrcSpanA arg_loc $
                   addExprCtxt arg     $  -- Auto-suppressed if arg_loc is generated
                   thing_inside }



View it on GitLab: https://gitlab.haskell.org/ghc/ghc/-/commit/04661ec18c2f735ea1993da9e2f69958e65327cb

-- 
View it on GitLab: https://gitlab.haskell.org/ghc/ghc/-/commit/04661ec18c2f735ea1993da9e2f69958e65327cb
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/20250114/ae5d0772/attachment.html>