RosettaCodeData/Task/Generic-swap/Emacs-Lisp/generic-swap-2.el
2026-04-30 12:34:36 -04:00

2 lines
59 B
EmacsLisp

(defmacro swap (a b)
`(setq ,b (prog1 ,a (setq ,a ,b))))