Skip to content

Instantly share code, notes, and snippets.

@sjl

sjl/documentation-is-hard.lisp

Created March 2, 2016 22:18
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save sjl/3defab3a443bbc08346a to your computer and use it in GitHub Desktop.
Save sjl/3defab3a443bbc08346a to your computer and use it in GitHub Desktop.
Download ZIP
Raw
documentation-is-hard.lisp
(defun get-body (env)
(let* ((content-length (getf env :content-length))
(raw-body (getf env :raw-body))
(body (make-string content-length)))
(read-sequence body raw-body)
body))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment