Commit 1e14f3fff085c5d132cff9bbc49cb0524a278cbe

Thomas de Grivel 2022-12-22T23:36:49

fix build

diff --git a/Makefile b/Makefile
index e7908c9..ae28afd 100644
--- a/Makefile
+++ b/Makefile
@@ -18,7 +18,7 @@ all: ${PROGRAM}
 deps:
 	LANG=C.UTF-8 ${LISP_LOAD} prepare-build.lisp --quit
 
-build/systems.lisp: prepare-build.lisp cl-unix-cybernetics.asd
+build/systems.lisp:
 	LANG=C.UTF-8 ${LISP_LOAD} prepare-build.lisp --quit
 
 ${PROGRAM}: build.lisp config.lisp build/systems.lisp toplevel.lisp
@@ -43,4 +43,4 @@ clean:
 distclean:
 	rm -rf ${DISTCLEANFILES}
 
-.PHONY: all clean deps install ${PROGRAM} release
+.PHONY: all build/systems.lisp clean deps install ${PROGRAM} release
diff --git a/core/include.lisp b/core/include.lisp
index 77454e1..17da42f 100644
--- a/core/include.lisp
+++ b/core/include.lisp
@@ -18,7 +18,7 @@
            (let ((path (str parts)))
              (when (probe-file path)
                (return-from include/resolve-filename path)))))
-    (try spec ".cl-unix-cybernetics")
+    (try spec ".lisp")
     (try spec)))
 
 (defun include/resolve-filename! (spec)
diff --git a/prepare-build.lisp b/prepare-build.lisp
index a5bcf0f..4f04ce5 100644
--- a/prepare-build.lisp
+++ b/prepare-build.lisp
@@ -148,9 +148,9 @@
   (let* ((asd (asdf:system-source-file system))
          (name (substitute #\- #\/ (asdf:component-name system)))
          (sbf (concatenate 'string "build/" name ".lisp")))
-    (unless (and (probe-file sbf)
-                 (<= (file-write-date asd)
-                     (file-write-date sbf)))
+    (when (or (not (probe-file sbf))
+              (< (file-write-date sbf)
+                 (file-write-date asd)))
       (write-system-build-file system sbf))
     sbf))