shithub: sl

Info  •  Files  •  Log  •  Branches

__finish: check if *exit-hooks* is bound before executing

--- a/src/system.sl

+++ b/src/system.sl

@@ -1635,4 +1635,5 @@

 (def (__finish status)

   "A function called right before exit by the VM."

-  (for-each (λ (f) (f status)) *exit-hooks*))

+  (when (bound? '*exit-hooks*)

+    (for-each (λ (f) (f status)) *exit-hooks*)))

-- 

⑨