summaryrefslogtreecommitdiff
path: root/compiler/GHC/CmmToAsm
diff options
context:
space:
mode:
authorBen Gamari <ben@smart-cactus.org>2022-01-26 20:38:45 -0500
committerBen Gamari <ben@smart-cactus.org>2022-01-29 14:52:56 -0500
commit313afb3d0f96c952ae74c946f8166a80f7e64d4a (patch)
tree8345a776cf037efa15d0c901e22fcef124037fc2 /compiler/GHC/CmmToAsm
parent0a1d0944d68265cb48cdb8e42f658d58c1cfdac7 (diff)
downloadhaskell-313afb3d0f96c952ae74c946f8166a80f7e64d4a.tar.gz
A few comment cleanups
Diffstat (limited to 'compiler/GHC/CmmToAsm')
-rw-r--r--compiler/GHC/CmmToAsm/Ppr.hs5
-rw-r--r--compiler/GHC/CmmToAsm/X86/Instr.hs7
2 files changed, 0 insertions, 12 deletions
diff --git a/compiler/GHC/CmmToAsm/Ppr.hs b/compiler/GHC/CmmToAsm/Ppr.hs
index 12b2402493..df113b45b6 100644
--- a/compiler/GHC/CmmToAsm/Ppr.hs
+++ b/compiler/GHC/CmmToAsm/Ppr.hs
@@ -50,11 +50,6 @@ word8ToWord# w = w
-- -----------------------------------------------------------------------------
-- Converting floating-point literals to integrals for printing
--- ToDo: this code is currently shared between SPARC and LLVM.
--- Similar functions for (single precision) floats are
--- present in the SPARC backend only. We need to fix both
--- LLVM and SPARC.
-
castDoubleToWord8Array :: STUArray s Int Double -> ST s (STUArray s Int Word8)
castDoubleToWord8Array = U.castSTUArray
diff --git a/compiler/GHC/CmmToAsm/X86/Instr.hs b/compiler/GHC/CmmToAsm/X86/Instr.hs
index e055fafb61..fa6e110056 100644
--- a/compiler/GHC/CmmToAsm/X86/Instr.hs
+++ b/compiler/GHC/CmmToAsm/X86/Instr.hs
@@ -754,14 +754,7 @@ isMetaInstr instr
DELTA{} -> True
_ -> False
-
-
---- TODO: why is there
-- | Make a reg-reg move instruction.
--- On SPARC v8 there are no instructions to move directly between
--- floating point and integer regs. If we need to do that then we
--- have to go via memory.
---
mkRegRegMoveInstr
:: Platform
-> Reg