racket/collects/tests/stepper/name-chaining.ss

10 lines
69 B
Scheme

(define (add-1 x) (+ 1 x))
(define g add-1)
g
(define h g)
(h 4)