fix type of hash-iterate-key+value

This commit is contained in:
Stephen Chang 2016-01-26 17:06:33 -05:00
parent c35716d461
commit 3a245a27e0

View File

@ -975,7 +975,7 @@
(-> -HashTop -Integer Univ)))]
[hash-iterate-key+value (-poly (a b)
(cl->* ((-HT a b) -Integer . -> . (-values (list a b)))
(-> -HashTop -Integer Univ)))]
(-> -HashTop -Integer (-values (list Univ Univ)))))]
[make-custom-hash (->opt (-> Univ Univ Univ) (-> Univ -Nat) [(-> Univ -Nat)] Univ)]
[make-immutable-custom-hash (->opt (-> Univ Univ Univ) (-> Univ -Nat) [(-> Univ -Nat)] Univ)]