diff options
Diffstat (limited to 'clisp/web.lisp')
-rw-r--r-- | clisp/web.lisp | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/clisp/web.lisp b/clisp/web.lisp new file mode 100644 index 0000000..83015a6 --- /dev/null +++ b/clisp/web.lisp @@ -0,0 +1,10 @@ +(ql:quickload :clack) + +(defun handler (env) + '(200 (:content-type "text/plain") + ("Hello, Everyone!"))) + +(defvar *server* + (clack:clackup + (lambda (env) (funcall 'handler env)) + :server :hunchentoot)) |