You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
16 lines
347 B
16 lines
347 B
;;;; cl-bible.lisp |
|
|
|
(in-package #:cl-bible) |
|
|
|
(defun start () |
|
(initialize (lambda (body) |
|
(setf cl-bible.clog::body body) |
|
(c:on-new-window body))) |
|
(open-browser)) |
|
|
|
(defun main () |
|
(start) |
|
(loop)) |
|
|
|
(defun build (&optional (name "bible")) |
|
#+sbcl (sb-ext:save-lisp-and-die name :executable t :toplevel #'main))
|
|
|