From a4b4ad24cb202ca4b76a82a40dc9a7f939dd4e49 Mon Sep 17 00:00:00 2001
From: panne <unknown>
Date: Fri, 30 Jun 2000 18:38:03 +0000
Subject: [PATCH] [project @ 2000-06-30 18:38:03 by panne] Remove parentheses
 around C function/macros names. This is necessary because cpp does *not*
 replace e.g.

   (eqForeignObj)(f1,f2)

with

  ((f1)==(f2))

(see PrimOps.h), heaven (or K&R) knows why. OK foreign importing
macros is a hack, but GHC seems to depend on it.
---
 ghc/compiler/absCSyn/PprAbsC.lhs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/ghc/compiler/absCSyn/PprAbsC.lhs b/ghc/compiler/absCSyn/PprAbsC.lhs
index 667d1bb8f55c..c7348719bbfc 100644
--- a/ghc/compiler/absCSyn/PprAbsC.lhs
+++ b/ghc/compiler/absCSyn/PprAbsC.lhs
@@ -838,7 +838,7 @@ pprCCall call@(CCall op_str is_asm may_gc cconv) args results vol_regs
 		if null non_void_results
 		  then empty
 		  else text "%r = ",
-		lparen, parens fun_name, lparen,
+		lparen, fun_name, lparen,
 		  hcat (punctuate comma ccall_fun_args),
 		text "));"
 	])
-- 
GitLab