t/t4018/scheme-local-define - git - Git at Google

 (define (higher-order)
   (define local-function RIGHT
     (lambda (x)
      (car "this is" "ChangeMe"))))
	(define (higher-order)
	(define local-function RIGHT
	(lambda (x)
	(car "this is" "ChangeMe"))))