7 lines
103 B
Racket
7 lines
103 B
Racket
#lang typed-scheme
|
|
|
|
(let: ([x : Number 1])
|
|
(let-syntax ([m (syntax-rules ()
|
|
[(_) x])])
|
|
(m)))
|