From 76ffa76c1bafa87edf2de90b1432fe3f4cb1d651 Mon Sep 17 00:00:00 2001
From: Mark Wooding <mdw@distorted.org.uk>
Date: Tue, 30 Apr 2024 01:39:00 +0100
Subject: [PATCH] frontend.lisp: Return a non-nil result for `cl-launch''s
 benefit.

---
 frontend.lisp | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/frontend.lisp b/frontend.lisp
index 661b80a..1c1a442 100644
--- a/frontend.lisp
+++ b/frontend.lisp
@@ -165,7 +165,8 @@
 		 (progv *zone-config* (mapcar #'symbol-value *zone-config*)
 		   (load f :verbose nil :print nil :if-does-not-exist :error)
 		   (delete-package *package*))))
-	     (zone-save opt-zones :format opt-format)))
+	     (zone-save opt-zones :format opt-format)
+	     t))
       (with-unix-error-reporting ()
 	(unless (option-parse-try
 		  (do-options ()
-- 
2.11.0