He does imperative programming in Lisp:
(let (a b result) (setq a 1) (setq b 2) (setq result (+ a b)) result)