From d01cf432ee2cac045532c3612f01f10dd5ed4c4c Mon Sep 17 00:00:00 2001 From: David Botton Date: Fri, 14 Jun 2024 14:25:56 -0400 Subject: [PATCH] correct error --- tools/clog-builder.lisp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/tools/clog-builder.lisp b/tools/clog-builder.lisp index 40efed2..851ed43 100644 --- a/tools/clog-builder.lisp +++ b/tools/clog-builder.lisp @@ -643,7 +643,7 @@ PATHNAME. Current format is one native namestring per line." (setf pathname (truename pathname)) (with-open-file (stream (system-index-file pathname) :direction :output - :if-exists :nil) + :if-exists nil) (when stream (dolist (system-file (local-project-system-files pathname)) (let ((system-path (enough-namestring system-file pathname)))