一道Common Lisp 宏的练习题

这是《ANSI Common Lisp》第10章“宏”的习题第6题： 

定义一个宏，接受一变量列表以及一个代码主体，并确保变量在代码主体被求值后恢复 (revert)到原本的数值