This commit is contained in:
Daniel Ziltener 2023-12-01 14:34:09 +01:00
parent 84deca651f
commit ea451f20e6
Signed by: zilti
GPG key ID: B38976E82C9DAE42
2 changed files with 2 additions and 2 deletions

View file

@ -82,7 +82,7 @@ As a sibling to the former, the variable ~%local-swap~ does the same with the sw
(let* ((os-list (read port)) (let* ((os-list (read port))
(os-list-length (length os-list))) (os-list-length (length os-list)))
(eval (eval
(cdr (cadr
(list-ref os-list (list-ref os-list
(- os-list-length 2))) (- os-list-length 2)))
(interaction-environment)))))) (interaction-environment))))))

View file

@ -32,7 +32,7 @@
(let* ((os-list (read port)) (let* ((os-list (read port))
(os-list-length (length os-list))) (os-list-length (length os-list)))
(eval (eval
(cdr (cadr
(list-ref os-list (list-ref os-list
(- os-list-length 2))) (- os-list-length 2)))
(interaction-environment)))))) (interaction-environment))))))