Skip to content

Commit 59f33a4

Browse files
committed
Replace (EQL ... NIL) with (NULL ...)
- NULL is intended to be used to test for the empty list - (NULL object) is more concise than (EQL object NIL)
1 parent fc5badd commit 59f33a4

File tree

1 file changed

+1
-1
lines changed

1 file changed

+1
-1
lines changed

quicklisp/client.lisp

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -99,7 +99,7 @@
9999
exclude-local-projects)
100100
"Write a list of system file pathnames to OUTPUT-FILE, one per line,
101101
in order of descending QL-DIST:PREFERENCE."
102-
(when (or (eql output-file nil)
102+
(when (or (null output-file)
103103
(eql output-file t))
104104
(setf output-file (qmerge "manifest.txt")))
105105
(with-open-file (stream output-file

0 commit comments

Comments
 (0)