Fix doc contracts

This commit is contained in:
Asumu Takikawa 2013-04-20 23:17:59 -04:00
parent 2d6fd46720
commit a9286ce726
2 changed files with 5 additions and 5 deletions

View File

@ -854,7 +854,7 @@ Returns the last pair of a (possibly improper) list.
(last-pair '(1 2 3 4))]} (last-pair '(1 2 3 4))]}
@defproc[(make-list [k exact-nonnegative-integer?] [v any?]) @defproc[(make-list [k exact-nonnegative-integer?] [v any/c])
list?]{ list?]{
Returns a newly constructed list of length @racket[k], holding Returns a newly constructed list of length @racket[k], holding

View File

@ -76,8 +76,8 @@ and @racket[code] versus @racket[racketblock] and
(code:line #:line-number-sep line-number-sep-expr)]) (code:line #:line-number-sep line-number-sep-expr)])
#:contracts ([keep-expr any/c] #:contracts ([keep-expr any/c]
[indent-expr exact-nonnegative-integer?] [indent-expr exact-nonnegative-integer?]
[expand-expr (or/c #f (syntax-object? . -> . syntax-object?))] [expand-expr (or/c #f (syntax? . -> . syntax?))]
[context-expr syntax-object?] [context-expr syntax?]
[line-number-expr (or/c #f exact-nonnegative-integer?)] [line-number-expr (or/c #f exact-nonnegative-integer?)]
[line-number-sep-expr exact-nonnegative-integer?])]{ [line-number-sep-expr exact-nonnegative-integer?])]{
@ -151,8 +151,8 @@ Like @racket[codeblock], but without the @racket['code-inset]
(code:line #:expand expand-expr) (code:line #:expand expand-expr)
(code:line #:context context-expr)]) (code:line #:context context-expr)])
#:contracts ([lang-line-expr (or/c #f string?)] #:contracts ([lang-line-expr (or/c #f string?)]
[expand-expr (or/c #f (syntax-object? . -> . syntax-object?))] [expand-expr (or/c #f (syntax? . -> . syntax?))]
[context-expr syntax-object?])]{ [context-expr syntax?])]{
Like @racket[codeblock], but produces @tech{content} instead of a Like @racket[codeblock], but produces @tech{content} instead of a
@tech{block}. No @hash-lang[] line should appear in the string content; @tech{block}. No @hash-lang[] line should appear in the string content;