changelog shortlog graph tags branches changeset file revisions annotate raw help

Mercurial > demo / examples/mbdump.lisp

revision 44: 99d4ab4f8d53
parent 41: 81b7333f27f8
     1.1--- a/examples/mbdump.lisp	Sun Jul 28 21:18:52 2024 -0400
     1.2+++ b/examples/mbdump.lisp	Sun Aug 11 01:50:18 2024 -0400
     1.3@@ -104,7 +104,7 @@
     1.4             do (write-line line out)))
     1.5     (push res *target*)))
     1.6 
     1.7-(defmain (:return *target*)
     1.8+(defmain ()
     1.9   (ensure-directories-exist *target-directory*)
    1.10   (let ((workers))
    1.11     (dolist (file (hash-table-keys *mbdump-files*) workers)