Delay type parsing error.
svn: r9912 original commit: 6d87dbc01683f794eb803117c4cc8a367915c600
This commit is contained in:
parent
526b3e3e98
commit
13a8c13f74
|
@ -195,7 +195,8 @@
|
|||
(tc-error "Wrong number of arguments to type ~a, expected ~a but got ~a" rator (length ns) (length args)))
|
||||
(instantiate-poly rator args)]
|
||||
[(Mu: _ _) (loop (unfold rator) args)]
|
||||
[_ (tc-error "Type ~a cannot be applied, arguments were: ~a" rator args)]))
|
||||
[_ (tc-error/delayed "Type ~a cannot be applied, arguments were: ~a" rator args)
|
||||
Univ]))
|
||||
#;
|
||||
(let ([ty (parse-type #'id)])
|
||||
#;(printf "ty is ~a" ty)
|
||||
|
|
Loading…
Reference in New Issue
Block a user