11 lines
314 B
Racket
11 lines
314 B
Racket
#lang s-exp syntax/module-reader
|
|
|
|
r5rs
|
|
|
|
#:wrapper1 (lambda (t)
|
|
(parameterize ([read-case-sensitive #f]
|
|
[read-accept-infix-dot #f]
|
|
[read-curly-brace-as-paren #f]
|
|
[read-square-bracket-as-paren #f])
|
|
(t)))
|