cl-adams/adams/build.lisp

Branch

Thomas de Grivel 408808cf5 2022-11-03T21:12:39
copyright
;; Adams - UNIX system administration tool written in Common Lisp
;; Copyright 2013-2022 Thomas de Grivel <thodg@kmx.io>

(in-package :common-lisp-user)

(declaim (optimize (speed 1)
                   (space 1)
                   (safety 3)
                   (debug 3)
                   (compilation-speed 0)))

(defun compile-lisp (path)
  (let* ((fasl (make-pathname :type "fasl" :defaults path))
         (fasl (merge-pathnames fasl)))
    (print fasl)
    (unless (and (probe-file fasl)
                 (<= (file-write-date path)
                     (file-write-date fasl)))
      (print path)
      (compile-file path :output-file fasl))
    (load fasl)))

(defun load* (path)
  (format t "~&Loading ~S" path)
  (load path))

(load* "config.lisp")
(load* "build/systems.lisp")
(load* "toplevel.lisp")
Download