8 lines
169 B
Racket
8 lines
169 B
Racket
#lang scheme/base
|
|
(require (for-syntax scheme/base)
|
|
"private/local.rkt")
|
|
(provide local)
|
|
|
|
(define-syntax (local stx)
|
|
(do-local stx #'letrec-syntaxes+values))
|