Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- (eval
- (list 'apply
- (list 'quote
- (list 'quote
- (list (list 'a 'b 'c)
- (list 'a 'b 'c)
- )
- )
- )
- (list 'quote
- (list
- (list
- (list 'f 'l)
- (list 'apply
- (list 'quote 'strcat)
- (list 'f (list 'reverse 'l))
- )
- )
- (list (list 'l)
- (list 'if 'l
- (list 'cons (list 'chr
- (list (list 'quote (list (list 'x) (list 'if 'x 'x 97)))
- (list 'car 'l))) (list 'f (list 'cdr 'l)))
- )
- )
- (list 118 111 110 nil 98 nil 108 nil 66 32 114 105 109 105 100 nil 108 86)
- )
- )
- )
- )
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement