aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/harness_adapter.c11
1 files changed, 0 insertions, 11 deletions
diff --git a/src/harness_adapter.c b/src/harness_adapter.c
index 3834a2c..24b813c 100644
--- a/src/harness_adapter.c
+++ b/src/harness_adapter.c
@@ -31,18 +31,7 @@ void plugin_load(int argc, char **argv, foreign_interface_t* fintf) {
}
void plugin_teardown(opqst_t st) {
- // the opaque state should be dereferenced by now. Perform a major GC to help
- // clean up before doing a reload.
- //
- // Used primarily in the case where the RTS is kept alive when performing a
- // hot-reload.
- // performMajorGC();
hs_exit();
-
- // There's a race condition between when this shared library is unloaded and
- // when the haskell runtime actually exits. Don't have a good solution for
- // this at the moment, so just sleep for a second.
- sleep(1);
}
void shell_exec(const char* cmd) {