diff --git a/cl-bible.lisp b/cl-bible.lisp
index f08fbe6..3c4dbf2 100644
--- a/cl-bible.lisp
+++ b/cl-bible.lisp
@@ -126,3 +126,7 @@
 (defun start ()
   (initialize #'on-new-window)
   (open-browser))
+
+(defun main ()
+  (start)
+  (loop))
diff --git a/package.lisp b/package.lisp
index 5aca335..e19576d 100644
--- a/package.lisp
+++ b/package.lisp
@@ -1,4 +1,6 @@
 ;;;; package.lisp
 
 (defpackage #:cl-bible
-  (:use #:cl #:clog #:clog-gui))
+  (:use #:cl #:clog #:clog-gui)
+  (:exports main
+            start))