Univ -> ManyUniv

original commit: 5fe8841c9951bce9453dae77ca3e4768d6a59c3e
This commit is contained in:
Asumu Takikawa 2012-11-30 14:53:49 -05:00
parent fec01c3f97
commit 711e418eec

View File

@ -35,4 +35,4 @@
;; set up the type environment
(define-initial-env initialize-contracted
[default-continuation-prompt-tag
(-> (make-Prompt-Tagof Univ (-> ManyUniv Univ)))])
(-> (make-Prompt-Tagof ManyUniv (-> ManyUniv ManyUniv)))])