default-web-root/servlets/dummy.ss
(module dummy mzscheme (require (lib "servlet.ss" "web-server")) (provide interface-version timeout start) (define interface-version (quote v1)) (define timeout +inf.0) (define (start initial-request) (make-response/full 200 "OK" (current-seconds) #"text/plain" (quote ()) (quote ("foo\r\n")))))