From dca430c4288ae1334cafd0d7d755634b601a73b5 Mon Sep 17 00:00:00 2001
From: sewardj <unknown>
Date: Wed, 30 Jan 2002 10:52:38 +0000
Subject: [PATCH] [project @ 2002-01-30 10:52:38 by sewardj] Fix syntax error
 in printing indirect calls in sparc assembly.

---
 ghc/compiler/nativeGen/PprMach.lhs |    2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/ghc/compiler/nativeGen/PprMach.lhs b/ghc/compiler/nativeGen/PprMach.lhs
index 60870cf..84374d8 100644
--- a/ghc/compiler/nativeGen/PprMach.lhs
+++ b/ghc/compiler/nativeGen/PprMach.lhs
@@ -1690,7 +1690,7 @@ pprInstr (JMP dsts addr) = (<>) (ptext SLIT("\tjmp\t")) (pprAddr addr)
 pprInstr (CALL (Left imm) n _)
   = hcat [ ptext SLIT("\tcall\t"), pprImm imm, comma, int n ]
 pprInstr (CALL (Right reg) n _)
-  = hcat [ ptext SLIT("\tcall *\t"), pprReg reg, comma, int n ]
+  = hcat [ ptext SLIT("\tcall\t"), pprReg reg, comma, int n ]
 \end{code}
 
 Continue with SPARC-only printing bits and bobs:
-- 
1.7.10.4