(in-package :http)

(lisp:clines "
#include \"buffer.c\"
#include \"http-parse.c\"
#include \"http-get.c\"")

(lisp:defentry %http-get (lisp:string lisp:int lisp:object lisp:object) (lisp:int "http_get"))
(lisp:defentry %retrieve-object (lisp:int lisp:int) (lisp:object "retrieve_object_from_array"))
(lisp:defentry decode-alist (lisp:object) (lisp:object "decode_alist"))
(lisp:defentry parse-post-request () (lisp:object "parse_post_request"))