[Git][ghc/ghc][wip/andreask/raPlatform_fix] RegAlloc: Add missing raPlatformfield to RegAllocStatsSpill

[Andreas Klebinger]

Andreas Klebinger pushed to branch wip/andreask/raPlatform_fix at Glasgow Haskell Compiler / GHC


Commits:
f67dac44 by Andreas Klebinger at 2020-11-25T18:56:14+01:00
RegAlloc: Add missing raPlatformfield to RegAllocStatsSpill

Fixes #18994

- - - - -


2 changed files:

- compiler/GHC/CmmToAsm/Reg/Graph.hs
- compiler/GHC/CmmToAsm/Reg/Graph/Stats.hs


Changes:

=====================================
compiler/GHC/CmmToAsm/Reg/Graph.hs
=====================================
@@ -283,7 +283,8 @@ regAlloc_spin config spinCount triv regsFree slotsFree slotsCount debug_codeGrap
                         , raCoalesced   = rmCoalesce
                         , raSpillStats  = spillStats
                         , raSpillCosts  = spillCosts
-                        , raSpilled     = code_spilled }
+                        , raSpilled     = code_spilled
+                        , raPlatform    = platform }
 
                 -- Bundle up all the register allocator statistics.
                 --   .. but make sure to drop them on the floor if they're not


=====================================
compiler/GHC/CmmToAsm/Reg/Graph/Stats.hs
=====================================
@@ -79,7 +79,10 @@ data RegAllocStats statics instr
         , raSpillCosts  :: SpillCostInfo
 
           -- | Code with spill instructions added.
-        , raSpilled     :: [LiveCmmDecl statics instr] }
+        , raSpilled     :: [LiveCmmDecl statics instr]
+
+          -- | Target platform
+        , raPlatform    = platform }
 
 
         -- a successful coloring



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

-- 
View it on GitLab: https://gitlab.haskell.org/ghc/ghc/-/commit/f67dac44951e5abd16f3813a05caf3584ff5aa24
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/20201125/e60708e9/attachment-0001.html>