Skip to content

Commit

Permalink
Minor fixes: delete-if on local sequence, unlambda
Browse files Browse the repository at this point in the history
  • Loading branch information
christophejunke committed Oct 5, 2020
1 parent da582ac commit 6768e63
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion str.lisp
Original file line number Diff line number Diff line change
Expand Up @@ -256,7 +256,7 @@
(res (cl-ppcre:split (cl-ppcre:quote-meta-chars (string separator))
s :limit limit :start start :end end :sharedp *sharedp*)))
(if omit-nulls
(remove-if (lambda (it) (empty? it)) res)
(delete-if #'empty? res)
res)))

(defun split-omit-nulls (separator s)
Expand Down

0 comments on commit 6768e63

Please sign in to comment.