.
This commit is contained in:
parent
84deca651f
commit
ea451f20e6
2 changed files with 2 additions and 2 deletions
|
@ -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))))))
|
||||||
|
|
|
@ -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))))))
|
||||||
|
|
Loading…
Reference in a new issue