In Clozure Common Lisp:

    ? (defun closure-test ()
        (let ((x 32))
          (list (lambda (y) (+ y 10))
                (lambda (y) (+ x y)))))
    CLOSURE-TEST

    ? (closure-test)
    (#<Compiled-function (:INTERNAL CLOSURE-TEST) (Non-Global)  #x302000CBD71F>
     #<COMPILED-LEXICAL-CLOSURE (:INTERNAL CLOSURE-TEST) #x302000D1EE2F>)