diff --git a/src/lsp/format.lsp b/src/lsp/format.lsp index 07ca0c08e..78816eeea 100644 --- a/src/lsp/format.lsp +++ b/src/lsp/format.lsp @@ -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)))