typed-racket/typed-racket-test/succeed/with-syntax.rkt
2014-12-16 10:07:25 -05:00

8 lines
154 B
Racket

#lang typed/racket
(require racket/syntax)
(: f : -> (Syntaxof Any))
(define (f)
(with-syntax* ([(x ...) (list 1 2 3)])
#`(#,(syntax +) x ...)))