Data update

Task/Generic-swap/Emacs-Lisp/generic-swap-1.l

@@ -1,6 +0,0 @@
-(defun swap (a-sym b-sym)
-  "Swap values of the variables given by A-SYM and B-SYM."
-  (let ((a-val (symbol-value a-sym)))
-    (set a-sym (symbol-value b-sym))
-    (set b-sym a-val)))
-(swap 'a 'b)

Task/Generic-swap/Emacs-Lisp/generic-swap-2.l

@@ -1,2 +0,0 @@
-(defmacro swap (a b)
-  `(setq ,b (prog1 ,a (setq ,a ,b))))

Task/Generic-swap/Emacs-Lisp/generic-swap-3.l

@@ -1,8 +0,0 @@
-(require 'cl-lib)
-(defmacro swap (a b)
-  `(cl-psetf ,a ,b
-             ,b ,a))
-
-(setq lst (list 123 456))
-(swap (car lst) (cadr lst))
-;; now lst is '(456 123)