Browse Source

Added main.

master
Silas Vedder 2 years ago
parent
commit
1243222d9d
  1. 4
      cl-bible.lisp
  2. 4
      package.lisp

4
cl-bible.lisp

@ -126,3 +126,7 @@
(defun start () (defun start ()
(initialize #'on-new-window) (initialize #'on-new-window)
(open-browser)) (open-browser))
(defun main ()
(start)
(loop))

4
package.lisp

@ -1,4 +1,6 @@
;;;; package.lisp ;;;; package.lisp
(defpackage #:cl-bible (defpackage #:cl-bible
(:use #:cl #:clog #:clog-gui)) (:use #:cl #:clog #:clog-gui)
(:exports main
start))

Loading…
Cancel
Save