Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- ;; I don't recommend you do this...
- (define (my-apply func args)
- (eval `(,func ,@(map (lambda (x) x) args))))
- (define x 41)
- (my-apply '+ '(x 1)) ; ==> 42
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement