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
|
word/rec
|
||||||
(contract-out
|
(contract-out
|
||||||
[word?
|
[word?
|
||||||
(-> any/c word?)]
|
(-> any/c boolean?)]
|
||||||
[word (->* () ((or/c #f word?)
|
[word (->* () ((or/c #f word?)
|
||||||
#:fps real?
|
#:fps real?
|
||||||
#:label (or/c string? (-> real? string?))
|
#:label (or/c string? (-> real? string?))
|
||||||
|
@ -207,9 +207,9 @@
|
||||||
[word-evt
|
[word-evt
|
||||||
(-> word? evt?)]
|
(-> word? evt?)]
|
||||||
[word-event
|
[word-event
|
||||||
(-> word? any/c word?)]
|
(-> word? any/c (or/c word? #f))]
|
||||||
[word-tick
|
[word-tick
|
||||||
(-> word? word?)]
|
(-> word? (or/c word? #f))]
|
||||||
[word-output
|
[word-output
|
||||||
(-> word? any/c)]
|
(-> word? any/c)]
|
||||||
[word-return
|
[word-return
|
||||||
|
|
Loading…
Reference in New Issue