;; example1
(defparameter tmp (let ((x 5)) (lambda () (print x))))
(funcall tmp) ; 5
(defvar x 2)
(funcall tmp) ; 2

;; example2
(defun test (y) (lambda () (print y)))
(defparameter tmp2 (test 5))
(funcall tmp2) ; 5
(defvar y 2)
(funcall tmp2) ; 5