fix contract errors on provides
This commit is contained in:
parent
f5d7c12760
commit
6f76c91fa6
6
word.rkt
6
word.rkt
|
@ -177,7 +177,7 @@
|
|||
word/rec
|
||||
(contract-out
|
||||
[word?
|
||||
(-> any/c word?)]
|
||||
(-> any/c boolean?)]
|
||||
[word (->* () ((or/c #f word?)
|
||||
#:fps real?
|
||||
#:label (or/c string? (-> real? string?))
|
||||
|
@ -207,9 +207,9 @@
|
|||
[word-evt
|
||||
(-> word? evt?)]
|
||||
[word-event
|
||||
(-> word? any/c word?)]
|
||||
(-> word? any/c (or/c word? #f))]
|
||||
[word-tick
|
||||
(-> word? word?)]
|
||||
(-> word? (or/c word? #f))]
|
||||
[word-output
|
||||
(-> word? any/c)]
|
||||
[word-return
|
||||
|
|
Loading…
Reference in New Issue