Simplify type of hash-has-key?.
This commit is contained in:
parent
b11c485523
commit
c0230fb6f4
|
@ -719,8 +719,7 @@
|
||||||
[hash-ref! (-poly (a b)
|
[hash-ref! (-poly (a b)
|
||||||
(cl-> [((-HT a b) a b) b]
|
(cl-> [((-HT a b) a b) b]
|
||||||
[((-HT a b) a (-> b)) b]))]
|
[((-HT a b) a (-> b)) b]))]
|
||||||
[hash-has-key? (-poly (a b) (cl-> [((-HT a b) a) B]
|
[hash-has-key? (-HashTop Univ . -> . B)]
|
||||||
[(-HashTop a) B]))]
|
|
||||||
[hash-update! (-poly (a b)
|
[hash-update! (-poly (a b)
|
||||||
(cl-> [((-HT a b) a (-> b b)) -Void]
|
(cl-> [((-HT a b) a (-> b b)) -Void]
|
||||||
[((-HT a b) a (-> b b) (-> b)) -Void]))]
|
[((-HT a b) a (-> b b) (-> b)) -Void]))]
|
||||||
|
|
Loading…
Reference in New Issue
Block a user