From 72bcf7e66269af588d9daa9064de23d257cbd053 Mon Sep 17 00:00:00 2001
From: Grant Shoshin Shangreaux <shoshin@cicadas.surf>
Date: Wed, 28 Dec 2022 14:02:25 -0600
Subject: Add: serialization for Heroes and dnd.api package

---
 init.lisp | 12 +++++++++++-
 1 file changed, 11 insertions(+), 1 deletion(-)

(limited to 'init.lisp')

diff --git a/init.lisp b/init.lisp
index 535da6c..c3382aa 100644
--- a/init.lisp
+++ b/init.lisp
@@ -1,6 +1,6 @@
 ;;;; init.lisp
 
-(in-package #:dnd)
+(in-package #:dnd.api)
 
 (defun init-db (&optional config)
   (if config
@@ -9,3 +9,13 @@
        'db:mp-store
        :directory (merge-pathnames "dnd-store/" (user-homedir-pathname))
        :subsystems (list (make-instance 'db:store-object-subsystem)))))
+
+(defvar *dnd-arena* nil
+  "The instance of the HTTP server.")
+
+(defun conjure-arena ()
+  (setf *dnd-arena* (lzb:create-server))
+  (lzb:install-app *dnd-arena* 'api)
+  (lzb:start-server *dnd-arena*))
+
+
-- 
cgit v1.2.3