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

Add quoting to error message.

Browse Source 
Closes PR14160.

original commit: eb67abb2ef18a2b91f6ee3544971f38e33700664
This commit is contained in:
Vincent St-Amour 2013-11-18 15:32:12 -05:00
parent e861cec692
commit a6f0db1fdb
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
pkgs/typed-racket-pkgs/typed-racket-lib/typed-racket/typecheck/tc-app-helper.rkt
View File

@ -326,7 +326,7 @@
msg-vars
(Function: (list (arr: msg-doms msg-rngs msg-rests msg-drests (list (Keyword: _ _ #f) ...)) ...))))
(let ([fcn-string (if name
(format "function ~a" (syntax->datum name))
(format "function `~a'" (syntax->datum name))
"function")])
(if (and (andmap null? msg-doms)
(null? argtypes))