LISP变量交换

(rotatef a b)

也:

(让(a b) (b a) ...)

另一种选择是“并行setf”:

(psetf a b b a)

还有一种方法:

(setf (values a b) (values b a))

相当可怕的方法,它只适用于数值,但它更通用,不依赖于语法:

a=a^b

b=a^b

a=a^b

假设a和b之前已被赋值,则^表示逻辑互斥替代。