typo that was not found previously by accident
svn: r6762
This commit is contained in:
parent
4016be1637
commit
53022c83b9
|
@ -38,7 +38,7 @@ of the @web-server in other applications, or loading a custom
|
||||||
dispatcher. See @file{run.ss} for an example of such a script.
|
dispatcher. See @file{run.ss} for an example of such a script.
|
||||||
|
|
||||||
@defproc[(serve [#:dispatch dispatch dispatcher?]
|
@defproc[(serve [#:dispatch dispatch dispatcher?]
|
||||||
[#:tcp@ tcp\@ tcp-unit^ raw:tcp\@]
|
[#:tcp\@ tcp\@ tcp-unit^ raw:tcp\@]
|
||||||
[#:port port integer? 80]
|
[#:port port integer? 80]
|
||||||
[#:listen-ip listen-ip (or/c string? false/c) #f]
|
[#:listen-ip listen-ip (or/c string? false/c) #f]
|
||||||
[#:max-waiting max-waiting integer? 40]
|
[#:max-waiting max-waiting integer? 40]
|
||||||
|
@ -49,7 +49,7 @@ dispatcher. See @file{run.ss} for an example of such a script.
|
||||||
}
|
}
|
||||||
|
|
||||||
@defproc[(serve/ports [#:dispatch dispatch dispatcher?]
|
@defproc[(serve/ports [#:dispatch dispatch dispatcher?]
|
||||||
[#:tcp@ tcp\@ tcp-unit^ raw:tcp\@]
|
[#:tcp\@ tcp\@ tcp-unit^ raw:tcp\@]
|
||||||
[#:ports ports (listof integer?) (list 80)]
|
[#:ports ports (listof integer?) (list 80)]
|
||||||
[#:listen-ip listen-ip (or/c string? false/c) #f]
|
[#:listen-ip listen-ip (or/c string? false/c) #f]
|
||||||
[#:max-waiting max-waiting integer? 40]
|
[#:max-waiting max-waiting integer? 40]
|
||||||
|
@ -60,7 +60,7 @@ dispatcher. See @file{run.ss} for an example of such a script.
|
||||||
}
|
}
|
||||||
|
|
||||||
@defproc[(serve/ips+ports [#:dispatch dispatch dispatcher?]
|
@defproc[(serve/ips+ports [#:dispatch dispatch dispatcher?]
|
||||||
[#:tcp@ tcp\@ tcp-unit^ raw:tcp\@]
|
[#:tcp\@ tcp\@ tcp-unit^ raw:tcp\@]
|
||||||
[#:ips+ports ips+ports (listof (cons/c (or/c string? false/c) (listof integer?))) (list (cons #f (list 80)))]
|
[#:ips+ports ips+ports (listof (cons/c (or/c string? false/c) (listof integer?))) (list (cons #f (list 80)))]
|
||||||
[#:max-waiting max-waiting integer? 40]
|
[#:max-waiting max-waiting integer? 40]
|
||||||
[#:initial-connection-timeout initial-connection-timeout integer? 60])
|
[#:initial-connection-timeout initial-connection-timeout integer? 60])
|
||||||
|
|
Loading…
Reference in New Issue
Block a user