summaryrefslogtreecommitdiff
path: root/rts/RtsFlags.c
diff options
context:
space:
mode:
authorIan Lynagh <igloo@earth.li>2010-10-28 13:48:54 +0000
committerIan Lynagh <igloo@earth.li>2010-10-28 13:48:54 +0000
commit723da2ed96068632ede8d1e8514dd02bbe1336ea (patch)
tree834f53b5f30de23b414970a9a3c4e0eef7801e2a /rts/RtsFlags.c
parentfb9d21af24d076b12abb9e22251aa327f82e8ea8 (diff)
downloadhaskell-723da2ed96068632ede8d1e8514dd02bbe1336ea.tar.gz
Replace some exit(n) calls with stg_exit(n); fixes trac #4445
Also changed exitcode of -1 to 1 in hpc.
Diffstat (limited to 'rts/RtsFlags.c')
-rw-r--r--rts/RtsFlags.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/rts/RtsFlags.c b/rts/RtsFlags.c
index 2e8ee9e9c8..c11cc3e925 100644
--- a/rts/RtsFlags.c
+++ b/rts/RtsFlags.c
@@ -554,7 +554,7 @@ error = rtsTrue;
else if (strequal("info",
&rts_argv[arg][2])) {
printRtsInfo();
- exit(0);
+ stg_exit(0);
}
else {
errorBelch("unknown RTS option: %s",rts_argv[arg]);