diff options
-rw-r--r-- | rts/RtsStartup.c | 4 |
1 files changed, 0 insertions, 4 deletions
diff --git a/rts/RtsStartup.c b/rts/RtsStartup.c index 123fb9b64a..33ffb83c1e 100644 --- a/rts/RtsStartup.c +++ b/rts/RtsStartup.c @@ -466,10 +466,6 @@ void shutdownHaskellAndExit(int n, int fastExit) { if (!fastExit) { - // even if hs_init_count > 1, we still want to shut down the RTS - // and exit immediately (see #5402) - hs_init_count = 1; - // we're about to exit(), no need to wait for foreign calls to return. hs_exit_(rtsFalse); } |