typed-racket/typed-racket-test/fail/pr14973.rkt
2015-02-21 15:40:23 -05:00

12 lines
224 B
Racket

#lang typed/racket/base
(require (for-syntax racket/base)
racket/splicing
racket/stxparam)
(define-syntax-parameter foo #f)
(splicing-syntax-parameterize ([foo #t])
(: x Number)
(define x "string"))