19 lines
271 B
Scheme
19 lines
271 B
Scheme
|
#lang scheme
|
||
|
|
||
|
(define (displayln x) (display x) (newline))
|
||
|
|
||
|
(define (outer)
|
||
|
(define x 1)
|
||
|
|
||
|
(define (middle)
|
||
|
(define (inner) (displayln x))
|
||
|
(displayln 2)
|
||
|
inner)
|
||
|
|
||
|
(displayln 3)
|
||
|
|
||
|
middle)
|
||
|
|
||
|
(define mid (outer))
|
||
|
(define in (mid))
|
||
|
(in)
|