suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Fix type for raise-type-error. Closes PR 11426.

Browse Source
This commit is contained in:
Vincent St-Amour 2010-11-22 17:21:26 -05:00
parent 2c74984fcd
commit e10f139ad8
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
collects/typed-scheme/private/base-env-indexing-abs.rkt
View File

@ -173,9 +173,9 @@
[random (cl-> [(index-type) -Nat] [() -Real])]
[raise-type-error
(cl->
[(Sym -String Univ) (Un)]
[(Sym -String index-type (-lst Univ)) (Un)])]
(cl->*
[-> Sym -String Univ (Un)]
[->* (list Sym -String index-type) Univ (Un)])]
))