fix cons/c use in contract

related to PR 14222

This doesn't completely fix that PR because the
implementation says that bytes are allowed and
the docs don't allow that. My guess is that the
implementation is wrong, not the docs, btu I'm not
sure and this may be a backwards compatibility
kind of thing, too. Also, path->collects-relative
should probably be considered (it doesn't allow
bytes? as an argument).
This commit is contained in:
Robby Findler 2013-12-04 09:49:34 -06:00
parent 5d36900c97
commit 85bd081907
2 changed files with 2 additions and 2 deletions

View File

@ -1328,7 +1328,7 @@ The @racket[cache] argument is used with @racket[path->pkg], if needed.}
@defproc[(collects-relative->path
[rel (or/c path-string?
(cons/c 'collects bytes? bytes? (listof bytes?)))])
(list/c 'collects bytes? bytes? (listof bytes?)))])
path-string?]{
The inverse of @racket[path->collects-relative]: if @racket[rel]

View File

@ -87,5 +87,5 @@
'collects-relative->path
(format "~s"
'(or/c bytes? path-string?
(cons/c 'collects bytes? bytes? (listof bytes?))))
(list/c 'collects bytes? bytes? (listof bytes?))))
p)]))