(define (make-post-request server request-uri data) (define uri (string-append "http://" server request-uri)) (http-request uri #:body data)) (define (wait-a-moment!) (usleep 10)) (include "web-client.scm")
