diff options
| author | Kavon Farvardin <kavon@farvard.in> | 2018-09-30 19:09:38 -0500 |
|---|---|---|
| committer | Kavon Farvardin <kavon@farvard.in> | 2018-09-30 19:09:38 -0500 |
| commit | ff5fd9c637506d6e780d1ee4d54c745b97f1dc2b (patch) | |
| tree | 9e5862b1260cc2a63faf91b81d5d241adb83d3da | |
| parent | 0424cc8a589590925738ca0748d47321e526698d (diff) | |
| download | haskell-wip/kavon-llvm-improve.tar.gz | |
remove redundant isSSE defwip/kavon-llvm-improve
| -rw-r--r-- | compiler/llvmGen/LlvmCodeGen/Base.hs | 3 |
1 files changed, 0 insertions, 3 deletions
diff --git a/compiler/llvmGen/LlvmCodeGen/Base.hs b/compiler/llvmGen/LlvmCodeGen/Base.hs index ac75409681..ec91bacc4c 100644 --- a/compiler/llvmGen/LlvmCodeGen/Base.hs +++ b/compiler/llvmGen/LlvmCodeGen/Base.hs @@ -155,9 +155,6 @@ llvmFunArgs dflags live = paddedLive = map (\(_,r) -> r) $ padLiveArgs live isLive r = r `elem` alwaysLive || r `elem` paddedLive isPassed r = not (isSSE r) || isLive r - isSSE r - | Just _ <- sseRegNum r = True - | otherwise = False isSSE :: GlobalReg -> Bool |