Fixing a problem with the contracts I committed
svn: r15798
This commit is contained in:
parent
78ad4f9615
commit
ea84b8d182
|
@ -33,7 +33,8 @@
|
||||||
make-binding-redirect-elements
|
make-binding-redirect-elements
|
||||||
sigelem)
|
sigelem)
|
||||||
(provide/contract
|
(provide/contract
|
||||||
[defidentifier ((identifier?) (#:form? boolean? #:index? boolean? #:show-libs? boolean?) . ->* . element?)])
|
; XXX What is return type?
|
||||||
|
[defidentifier ((identifier?) (#:form? boolean? #:index? boolean? #:show-libs? boolean?) . ->* . any/c)])
|
||||||
|
|
||||||
(define (gen-absolute-tag)
|
(define (gen-absolute-tag)
|
||||||
`(abs ,(make-generated-tag)))
|
`(abs ,(make-generated-tag)))
|
||||||
|
|
Loading…
Reference in New Issue
Block a user