From: sof Date: Mon, 9 Nov 1998 08:42:36 +0000 (+0000) Subject: [project @ 1998-11-09 08:42:36 by sof] X-Git-Tag: Approx_2487_patches~214 X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=33a2c36d33f04feddb29f77195e250fc0afc85be;p=ghc-hetmet.git [project @ 1998-11-09 08:42:36 by sof] avoid uncessary gcc warning --- diff --git a/ghc/compiler/deSugar/DsForeign.lhs b/ghc/compiler/deSugar/DsForeign.lhs index be886a4..52b177b 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;")