CL-USER> (prog1
(+ 1 2)
(+ 2 3)
(+ 3 4))
3
CL-USER> (prog2
(+ 1 2)
(+ 2 3)
(+ 3 4))
5
CL-USER> (progn
(+ 1 2)
(+ 2 3)
(+ 3 4))
7
CL-USER>
区别(摘自http://www.emacswiki.org/emacs/EmacsLispManual_Chinese_Notes#toc400):
progn forms...
prog1 form1 forms...
prog2 form1 form2 forms...