[project @ 2005-04-27 09:57:14 by simonmar]

[ghc-hetmet.git] / ghc / compiler / nativeGen / MachInstrs.hs

diff --git a/ghc/compiler/nativeGen/MachInstrs.hs b/ghc/compiler/nativeGen/MachInstrs.hs
index c86f3d1..1a4c4b8 100644 (file)
--- a/ghc/compiler/nativeGen/MachInstrs.hs
+++ b/ghc/compiler/nativeGen/MachInstrs.hs
@@ -504,7 +504,7 @@ bit or 64 bit precision.
        | JMP         Operand
        | JXX         Cond BlockId  -- includes unconditional branches
        | JMP_TBL     Operand [BlockId]  -- table jump
-       | CALL        (Either Imm Reg)
+       | CALL        (Either Imm Reg) [Reg]
 
 -- Other things.
        | CLTD MachRep   -- sign extend %eax into %edx:%eax