more progress on the framework docs
svn: r9539 original commit: faaa7d1bc1b14dfddc3a784c912b0d4aae98d73d
This commit is contained in:
parent
187b1ae2e8
commit
de59a62d0f
|
@ -108,7 +108,7 @@
|
||||||
(length (syntax->list #'(arg-names ...))))
|
(length (syntax->list #'(arg-names ...))))
|
||||||
(raise-syntax-error #f "mismatched argument list and domain contract count" stx))
|
(raise-syntax-error #f "mismatched argument list and domain contract count" stx))
|
||||||
#'([(id (arg-names ctcs) ...) result]))]
|
#'([(id (arg-names ctcs) ...) result]))]
|
||||||
|
|
||||||
[((->* (mandatory ...) (optional ...) result)
|
[((->* (mandatory ...) (optional ...) result)
|
||||||
((mandatory-names ...)
|
((mandatory-names ...)
|
||||||
((optional-names optional-default) ...)))
|
((optional-names optional-default) ...)))
|
||||||
|
|
Loading…
Reference in New Issue
Block a user