From: Simon Marlow Date: Thu, 16 Mar 2006 14:49:14 +0000 (+0000) Subject: fix a warning X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=commitdiff_plain;h=b551e40cbabc0eb30df13771d7d55c6b6f4e3ab0 fix a warning --- diff --git a/ghc/rts/win32/ConsoleHandler.c b/ghc/rts/win32/ConsoleHandler.c index 413e13c..d7096db 100644 --- a/ghc/rts/win32/ConsoleHandler.c +++ b/ghc/rts/win32/ConsoleHandler.c @@ -182,7 +182,7 @@ void markSignalHandlers (evac_fn evac) { if (console_handler >= 0) { StgPtr p = deRefStablePtr((StgStablePtr)console_handler); - evac((StgClosure**)&p); + evac((StgClosure**)(void *)&p); } }