git » jacl.git » commit f9abcbc

PSETQ tweak

author Alan Dipert
2021-08-02 02:31:46 UTC
committer Alan Dipert
2021-08-02 02:31:46 UTC
parent 48ef9b1623cd58c1a94e0f2f880bd04aa4358db8

PSETQ tweak

boot.lisp +2 -2

diff --git a/boot.lisp b/boot.lisp
index 834822e..fe7b909 100644
--- a/boot.lisp
+++ b/boot.lisp
@@ -542,8 +542,8 @@
                     triples)
        (setq ,@(%mapcan (lambda (triple)
                           (list (car triple) (caddr triple)))
-                        triples))
-       (setq ,@(%mapcan (lambda (triple)
+                        triples)
+             ,@(%mapcan (lambda (triple)
                           (list (cadr triple) (car triple)))
                         triples)))))