Make error messages more consistent.
original commit: 59f5f24736998a027f920d481fdd3c60ccaefb59
This commit is contained in:
parent
7ecdc4eff3
commit
6f4746ad75
|
@ -166,7 +166,7 @@
|
|||
;; error for unbound variables
|
||||
(define (lookup-fail e)
|
||||
(match (identifier-binding e)
|
||||
['lexical (tc-error/expr "untyped lexical variable ~a" (syntax-e e))]
|
||||
['lexical (tc-error/expr "untyped identifier ~a" (syntax-e e))]
|
||||
[#f (tc-error/expr "untyped top-level identifier ~a" (syntax-e e))]
|
||||
[(list _ _ nominal-source-mod nominal-source-id _ _ _)
|
||||
(let-values ([(x y) (module-path-index-split nominal-source-mod)])
|
||||
|
|
Loading…
Reference in New Issue
Block a user