Make toplevel function return nothing

vydd · Nov 5, 2023 · e9b0ead · e9b0ead
1 parent 195c6ef
commit e9b0ead
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/src/utils.lisp b/src/utils.lisp
@@ -53,7 +53,8 @@ Possible options:
                 (initialize-sketch)
                 ,@(cdr (assoc :start options))
                 (make-instance ',sketch-name ,@initargs))))
-           ,@(cdr (assoc :quit options)))
+           ,@(cdr (assoc :quit options))
+           (values))
          (values ',name ',toplevel-name)))))
 
 (defun pad-list (list pad length)