Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- (defun test (L) (lambda (M) L))
- (setq L `(1 2 3))
- (setq test1 (test L))
- (write (funcall test1 10)) ; (1 2 3)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement