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

change error message for `define:' (fixes PR 10883)

Browse Source
This commit is contained in:
Sam Tobin-Hochstadt 2010-05-03 11:33:42 -04:00
parent abc83496b3
commit 55929072bb
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
collects/typed-scheme/private/prims.rkt
View File

@ -199,7 +199,7 @@ This file defines two sorts of primitives. All of them are provided into any mod
(syntax/loc stx
(define: nm : arrty
(lambda: formals body ...))))]
[(define: nm:id ~! (~describe "type annotation" (~seq : ty)) body)
[(define: nm:id ~! (~describe ":" :) (~describe "type" ty) body)
(identifier? #'nm)
(with-syntax ([new-nm (syntax-property #'nm 'type-label #'ty)])
(syntax/loc stx (define new-nm body)))]