floss/stoe
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Always call the finalize function when returning from the main loop

Browse source
This commit is contained in:
Renaud Casenave-Péré 2014-09-30 14:33:32 +09:00
parent d5d0aefbbd
commit b8579526c0
1 changed files with 3 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
src/stoe.lisp
View file

@ -32,5 +32,6 @@ continue unless `unprotected' is t."
(defun main (&optional argv) (defun main (&optional argv)
"Run the program." "Run the program."
(modules:initialize argv) (modules:initialize argv)
(main-loop) (unwind-protect
(modules:finalize)) (main-loop)
(modules:finalize)))