(require (lib "servlet-sig.ss" "web-server")
(lib "unit.ss"))
(unit
(import servlet^)
(export)
(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")))))