From e9c5cb6964baccb27ffa16fd2c3d29f66c706a02 Mon Sep 17 00:00:00 2001
From: simonmar <unknown>
Date: Mon, 18 Oct 2004 11:46:46 +0000
Subject: [PATCH] [project @ 2004-10-18 11:46:46 by simonmar]
 ccallConvAttribute: use __attribute__((__stdcall__)) rather
 than __stdcall (the latter is Win32-specific).

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

diff --git a/ghc/compiler/prelude/ForeignCall.lhs b/ghc/compiler/prelude/ForeignCall.lhs
index 12b85b1..2c90a7d 100644
--- a/ghc/compiler/prelude/ForeignCall.lhs
+++ b/ghc/compiler/prelude/ForeignCall.lhs
@@ -149,7 +149,7 @@ calling convention (used by PprAbsC):
 
 \begin{code}
 ccallConvAttribute :: CCallConv -> String
-ccallConvAttribute StdCallConv = "__stdcall"
+ccallConvAttribute StdCallConv = "__attribute__((__stdcall__))"
 ccallConvAttribute CCallConv   = ""
 \end{code}
 
-- 
1.7.10.4