test.scm 209 B

123456789
  1. ;;; Hello HTTP server
  2. (use-modules (web server))
  3. (define (my-handler request request-body)
  4. (values '((content-type . (text/plain)))
  5. "Hello World!"))
  6. (run-server my-handler 'http '(#:port 8081) )