mirrors/ecl
1
Fork 0
mirror of https://gitlab.com/embeddable-common-lisp/ecl.git synced 2026-01-25 05:51:55 -08:00
Code Issues Projects Releases Packages Wiki Activity

Avoid add NIL to LOOP

Browse source
This commit is contained in:
Tarn W. Burton 2023-02-20 15:08:18 -05:00
parent de89593216
commit 6323c4e574
1 changed files with 2 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

3
src/lsp/format.lsp
View file

@ -543,7 +543,8 @@
(form new-directives)
(expand-directive (car remaining-directives)
(cdr remaining-directives))
(push form results)
(when form
(push form results))
(setf remaining-directives new-directives)))
(reverse results)))