diff options
author | Kjetil Orbekk <kj@orbekk.com> | 2024-02-25 14:46:22 -0500 |
---|---|---|
committer | Kjetil Orbekk <kj@orbekk.com> | 2024-02-25 14:46:22 -0500 |
commit | 116dc5f0b548a43390ee13636b2d372c07af3702 (patch) | |
tree | 88d7b2aeba1619a25a694dc08082ae35b1d4ade5 /clisp/web.lisp | |
parent | 465c3a1045625d12a73e723651ae9bd9b0a51cb1 (diff) |
update
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)) |