[Git][ghc/ghc][wip/T25647] remove unused updateHoleMode function from TcTyMode

Patrick (@soulomoon) gitlab at gitlab.haskell.org
Sat Feb 15 09:15:40 UTC 2025



Patrick pushed to branch wip/T25647 at Glasgow Haskell Compiler / GHC


Commits:
4a21a518 by Patrick at 2025-02-15T17:15:31+08:00
remove unused updateHoleMode function from TcTyMode

- - - - -


1 changed file:

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


Changes:

=====================================
compiler/GHC/Tc/Gen/HsType.hs
=====================================
@@ -998,14 +998,6 @@ mkHoleMode tyki hm
        ; return (TcTyMode { mode_tyki  = tyki
                           , mode_holes = Just (lvl,hm) }) }
 
-updateHoleMode :: HoleMode -> TcTyMode -> TcTyMode
-updateHoleMode hm m at TcTyMode { mode_tyki = tyki, mode_holes =  mh }
-  |Just (lvl, _) <- mh
-  = (TcTyMode { mode_tyki = tyki
-              , mode_holes = Just (lvl, hm) })
-  | otherwise
-  = m
-
 updateFamArgType :: FamArgType -> TcTyMode -> TcTyMode
 updateFamArgType fam_arg m at TcTyMode { mode_tyki = tyki, mode_holes =  mh }
   |Just (lvl, HM_FamPat _) <- mh



View it on GitLab: https://gitlab.haskell.org/ghc/ghc/-/commit/4a21a5183679b351a4cdc89db415d2c74fdbe4ab

-- 
View it on GitLab: https://gitlab.haskell.org/ghc/ghc/-/commit/4a21a5183679b351a4cdc89db415d2c74fdbe4ab
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/20250215/e8f217ac/attachment-0001.html>


More information about the ghc-commits mailing list