summaryrefslogtreecommitdiff
path: root/rts/Linker.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/Linker.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/Linker.c')
-rw-r--r--rts/Linker.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/rts/Linker.c b/rts/Linker.c
index 4b984dac2d..1614a1a78f 100644
--- a/rts/Linker.c
+++ b/rts/Linker.c
@@ -1109,7 +1109,7 @@ static void ghciInsertStrHashTable ( char* obj_name,
(char*)key,
obj_name
);
- exit(1);
+ stg_exit(1);
}
/* -----------------------------------------------------------------------------
* initialize the object linker