thodg/cl-unix-cybernetics/toplevel.lisp

Branch : - branch - master v0.3 - tag - adams-0.1 adams-0.2 adams-0.3 adams-0.3.1 adams-0.3.2 v0.3.3

• Show log

  Commit

• Author : Thomas de Grivel
  Date : 2022-12-04 18:50:53
  Hash : b0ab5bb5
  Message : cl-unix-cybernetics

• toplevel.lisp

• ;; cl-unix-cybernetics
  ;; Copyright 2013-2022 Thomas de Grivel <thodg@kmx.io>
  ;;
  ;; Permission is hereby granted to use this software granted
  ;; the above copyright notice and this permission paragraph
  ;; are included in all copies and substantial portions of this
  ;; software.
  ;;
  ;; THIS SOFTWARE IS PROVIDED "AS-IS" WITHOUT ANY GUARANTEE OF
  ;; PURPOSE AND PERFORMANCE. IN NO EVENT WHATSOEVER SHALL THE
  ;; AUTHOR BE CONSIDERED LIABLE FOR THE USE AND PERFORMANCE OF
  ;; THIS SOFTWARE.
  
  (in-package :cl-user)
  
  (flet ((cl-unix-cybernetics-toplevel ()
           (let ((*package* (find-package :cl-unix-cybernetics-user)))
             (sb-impl::toplevel-init))))
    (sb-ext:save-lisp-and-die #P"build/cl-unix-cybernetics"
                              :toplevel #'cl-unix-cybernetics-toplevel
                              :executable t)))