bldc/tests/test_lambda_11.lisp

7 lines
102 B
Common Lisp

(define f2 (lambda () (lambda (x) (- x 1))))
(define f (lambda (n) ((f2) n) ))
(check (= (f 2) 1))