From 33a2c36d33f04feddb29f77195e250fc0afc85be Mon Sep 17 00:00:00 2001
From: sof <unknown>
Date: Mon, 9 Nov 1998 08:42:36 +0000
Subject: [PATCH] [project @ 1998-11-09 08:42:36 by sof] avoid uncessary gcc
warning
---
ghc/compiler/deSugar/DsForeign.lhs | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/ghc/compiler/deSugar/DsForeign.lhs b/ghc/compiler/deSugar/DsForeign.lhs
index be886a470549..52b177b4708a 100644
--- a/ghc/compiler/deSugar/DsForeign.lhs
+++ b/ghc/compiler/deSugar/DsForeign.lhs
@@ -596,7 +596,7 @@ fexportEntry c_nm helper args res cc =
startTemplate =
vcat
- [ text "extern realWorldZh_closure;"
+ [ text "extern void* realWorldZh_closure;"
, ptext SLIT("STGFUN") <> parens (h_stub_nm)
, lbrace
, ptext SLIT("FUNBEGIN;")
--
GitLab