svn: r17930
This commit is contained in:
Jay McCarthy 2010-02-01 19:51:06 +00:00
parent 09ef762e3f
commit 2e4c8e102a

View File

@ -92,11 +92,13 @@ responses. One basic kind of response is to show an HTML page.
@schemeblock[
(define html-response/c
(flat-rec-contract
html-response
(or/c string?
(or/c (cons/c symbol? (listof html-response/c))
(or/c (cons/c symbol? (listof html-response))
(cons/c symbol?
(cons/c (listof (list/c symbol? string?))
(listof html-response/c))))))]
(listof html-response)))))))]
For example: