[Git][ghc/ghc][wip/romes/12935] 2 commits: Use inherited tag rather than 'Q'

[Rodrigo Mesquita (@alt-romes)]

Rodrigo Mesquita pushed to branch wip/romes/12935 at Glasgow Haskell Compiler / GHC


Commits:
1acd4b62 by Rodrigo Mesquita at 2024-07-03T13:29:01+01:00
Use inherited tag rather than 'Q'

- - - - -
f0a4b1b5 by Rodrigo Mesquita at 2024-07-03T13:30:42+01:00
Disable renaming to check performance

- - - - -


2 changed files:

- compiler/GHC/Cmm/UniqueRenamer.hs
- compiler/GHC/StgToCmm.hs


Changes:

=====================================
compiler/GHC/Cmm/UniqueRenamer.hs
=====================================
@@ -72,7 +72,7 @@ renameDetUniq uq = do
     Nothing -> do
       new_w <- gets supply -- New deterministic unique in this `DetRnM`
       let (tag, _) = unpkUnique uq
-          det_uniq = mkUnique 'Q' new_w
+          det_uniq = mkUnique tag new_w
       modify' (\DetUniqFM{mapping, supply} ->
         -- Update supply and mapping
         DetUniqFM


=====================================
compiler/GHC/StgToCmm.hs
=====================================
@@ -103,7 +103,8 @@ codeGen logger tmpfs cfg (InfoTableProvMap (UniqMap denv) _ _) data_tycons
 
                          let
                            ((a, cmm), st') = runC cfg fstate st (getCmm fcode)
-                           (rnm1, cmm_renamed) = detRenameUniques rnm0 cmm -- The yielded cmm will already be renamed.
+                           (rnm1, cmm_renamed) = (rnm0, cmm) -- TODO:
+                              {- ENABLE IF OPT-DETERMINISTIC FLAG: -} -- detRenameUniques rnm0 cmm -- The yielded cmm will already be renamed.
 
                          -- NB. stub-out cgs_tops and cgs_stmts.  This fixes
                          -- a big space leak.  DO NOT REMOVE!



View it on GitLab: https://gitlab.haskell.org/ghc/ghc/-/compare/db41639cebe5a771a1e862236b063ead5870979a...f0a4b1b54cd8bf6f28422eafe4e84c7a978b9251

-- 
This project does not include diff previews in email notifications.
View it on GitLab: https://gitlab.haskell.org/ghc/ghc/-/compare/db41639cebe5a771a1e862236b063ead5870979a...f0a4b1b54cd8bf6f28422eafe4e84c7a978b9251
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/20240703/875fef07/attachment-0001.html>