(ql:quickload "hunchentoot")

(defun start-server ()
  (make-instance 'hunchentoot:easy-acceptor :port 4444
		 :document-root #p"src/"))


(defun stop-server ()
  (hunchentoot:stop *))