diff options
author | Josh Rahm <rahm@google.com> | 2024-03-05 10:29:47 -0700 |
---|---|---|
committer | Josh Rahm <rahm@google.com> | 2024-03-05 10:29:47 -0700 |
commit | 9a696c2b071dfecb691d16c66bfd00edd54c4beb (patch) | |
tree | 9f4f1ac96a939415a0a1c7664a63ade6c3d7cd4e | |
parent | dc83dc6725c7af7dc7345b6085ac8f281602946a (diff) | |
download | wetterhorn-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.c | 11 |
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) { |