~ chicken-core (master) /tests/r7rs-library-tests-code.scm
1(define (fx x) 2 (+ x x)) 3 4(define-syntax mx 5 (syntax-rules () 6 ((_ x) (+ x x))))
1(define (fx x)
2 (+ x x))
3
4(define-syntax mx
5 (syntax-rules ()
6 ((_ x) (+ x x))))