aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJosh Rahm <rahm@google.com>2024-03-05 10:29:47 -0700
committerJosh Rahm <rahm@google.com>2024-03-05 10:29:47 -0700
commit9a696c2b071dfecb691d16c66bfd00edd54c4beb (patch)
tree9f4f1ac96a939415a0a1c7664a63ade6c3d7cd4e
parentdc83dc6725c7af7dc7345b6085ac8f281602946a (diff)
downloadwetterhorn-9a696c2b071dfecb691d16c66bfd00edd54c4beb.tar.gz
wetterhorn-9a696c2b071dfecb691d16c66bfd00edd54c4beb.tar.bz2
wetterhorn-9a696c2b071dfecb691d16c66bfd00edd54c4beb.zip
Remove sleep() statement in teardown. It's not actually needed.
-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) {