summaryrefslogtreecommitdiff
path: root/ghc/compiler/nativeGen/MachMisc.lhs
diff options
context:
space:
mode:
authorsewardj <unknown>2000-01-31 18:11:50 +0000
committersewardj <unknown>2000-01-31 18:11:50 +0000
commit298e7a785bd89b51e0e8c34980cd4ceac7d3dce0 (patch)
tree433fc9cc81965b3b29c7e58c60fba48dcad5a781 /ghc/compiler/nativeGen/MachMisc.lhs
parent8db5c9818937c1f952e4cdd58451ea6b25975441 (diff)
downloadhaskell-298e7a785bd89b51e0e8c34980cd4ceac7d3dce0.tar.gz
[project @ 2000-01-31 18:11:50 by sewardj]
Spilling and x86 shift-code cleanups.
Diffstat (limited to 'ghc/compiler/nativeGen/MachMisc.lhs')
-rw-r--r--ghc/compiler/nativeGen/MachMisc.lhs8
1 files changed, 4 insertions, 4 deletions
diff --git a/ghc/compiler/nativeGen/MachMisc.lhs b/ghc/compiler/nativeGen/MachMisc.lhs
index 893bf873e4..6f5337339d 100644
--- a/ghc/compiler/nativeGen/MachMisc.lhs
+++ b/ghc/compiler/nativeGen/MachMisc.lhs
@@ -503,11 +503,11 @@ current translation.
| XOR Size Operand Operand
| NOT Size Operand
| NEGI Size Operand -- NEG instruction (name clash with Cond)
- | SHL Size Operand Operand -- 1st operand must be an Imm or CL
- | SAR Size Operand Operand -- 1st operand must be an Imm or CL
- | SHR Size Operand Operand -- 1st operand must be an Imm or CL
- | NOP
+ | SHL Size Imm Operand -- Only immediate shifts allowed
+ | SAR Size Imm Operand -- Only immediate shifts allowed
+ | SHR Size Imm Operand -- Only immediate shifts allowed
| BT Size Imm Operand
+ | NOP
-- Float Arithmetic. -- ToDo for 386