(require (lib "servlet-sig.ss" "web-server") ; (lib "servlet-helpers.ss" "web-server") (lib "unitsig.ss")) (unit/sig () (import servlet^) (send/finish (make-html-response/incremental (lambda (output-chunk) (output-chunk "" "my-title\n") (output-chunk "

The first paragraph

\n") (sleep 4) (output-chunk "

The second paragraph

\n")))))