FIX part of #2301, and #1619

[ghc-hetmet.git] / includes / RtsAPI.h

diff --git a/includes/RtsAPI.h b/includes/RtsAPI.h
index 54fa3ee..99aaa59 100644 (file)
--- a/includes/RtsAPI.h
+++ b/includes/RtsAPI.h
@@ -45,6 +45,10 @@ extern void setProgArgv            ( int argc, char *argv[] );
 extern void getFullProgArgv        ( int *argc, char **argv[] );
 extern void setFullProgArgv        ( int argc, char *argv[] );
 
+#ifndef mingw32_HOST_OS
+extern void shutdownHaskellAndSignal (int sig);
+#endif
+
 /* exit() override */
 extern void (*exitFn)(int);