Have provide: annotate the original identifier as well.

Fixes PR 15292.
This commit is contained in:
Sam Tobin-Hochstadt 2016-04-20 13:26:29 -04:00
parent af385d6932
commit 3f889bcf8c

View File

@ -634,6 +634,7 @@ the typed racket language.
(define/with-syntax (i* ...) i*s)
(syntax/loc stx
(begin (: i* t) ...
(: i t) ...
(provide (rename-out [i* i] ...))))]))
(define-syntax (declare-refinement stx)