[commit: ghc] wip/carter/remove_x87Registers: trim spurious white space i accidentally added (b370285)
git at git.haskell.org
git at git.haskell.org
Thu Dec 27 17:00:00 UTC 2018
Repository : ssh://git@git.haskell.org/ghc
On branch : wip/carter/remove_x87Registers
Link : http://ghc.haskell.org/trac/ghc/changeset/b370285e8c9c8eba9b3ab9da7d3a0892487ed2ef/ghc
>---------------------------------------------------------------
commit b370285e8c9c8eba9b3ab9da7d3a0892487ed2ef
Author: Carter Tazio Schonwald <carter.schonwald at gmail.com>
Date: Fri Dec 21 20:58:19 2018 -0500
trim spurious white space i accidentally added
>---------------------------------------------------------------
b370285e8c9c8eba9b3ab9da7d3a0892487ed2ef
compiler/nativeGen/RegAlloc/Linear/X86_64/FreeRegs.hs | 2 --
1 file changed, 2 deletions(-)
diff --git a/compiler/nativeGen/RegAlloc/Linear/X86_64/FreeRegs.hs b/compiler/nativeGen/RegAlloc/Linear/X86_64/FreeRegs.hs
index 61e654f..3a6e340 100644
--- a/compiler/nativeGen/RegAlloc/Linear/X86_64/FreeRegs.hs
+++ b/compiler/nativeGen/RegAlloc/Linear/X86_64/FreeRegs.hs
@@ -44,8 +44,6 @@ getFreeRegs platform cls (FreeRegs f) = go f 0
-- ToDo: there's no point looking through all the integer registers
-- in order to find a floating-point one.
-
-
allocateReg :: RealReg -> FreeRegs -> FreeRegs
allocateReg (RealRegSingle r) (FreeRegs f)
= FreeRegs (f .&. complement (1 `shiftL` r))
More information about the ghc-commits
mailing list