Don't lookup #f in the hash table

This commit is contained in:
Christopher Baines 2024-11-29 10:09:41 +00:00
parent 64aeeffd8e
commit e14fd88d8f

View file

@ -945,8 +945,9 @@
(let ((missing-file-names (let ((missing-file-names
(vector-fold (vector-fold
(lambda (_ result file-name) (lambda (_ result file-name)
(if (hash-ref derivation-ids-hash-table (if (and file-name
file-name) (hash-ref derivation-ids-hash-table
file-name))
result result
(cons file-name (cons file-name
result))) result)))