: (define (make-bookends bookend-word)
(lambda (w) (word bookend-word w bookend-word)))
make-bookends
: ((make-bookends 'o) 'hi)
ohio
: ((make-bookends 'to) 'n)
tonto
: (define to-bookend (make-bookends 'to)) to-bookend
: (to-bookend 'ron) toronto
: (define (oo)
(lambda () 'infinity))
: ((oo)) infinity