A band-aid workaround for 68384. The situation should not be possible, not clear whether there is a missed detail about ASDF or SBCL
This commit is contained in:
parent
a25dd40eb5
commit
98ddcfe794
@ -265,7 +265,9 @@ parasitic systems will be tracked."
|
||||
(cond
|
||||
(source-file
|
||||
(loop :for system-name :being :the :hash-keys :of asdf/find-system::*registered-systems* :do
|
||||
(when (and (parasitic-relationship-p system system-name)
|
||||
; for an unclear reason, a literal 0 which is not a key in the hash table gets observed
|
||||
(when (and (gethash system-name asdf/find-system::*registered-systems*)
|
||||
(parasitic-relationship-p system system-name)
|
||||
(not (blacklisted-parasite-p system-name)))
|
||||
(found-new-parasite system-name)
|
||||
(let ((*track-dependencies* t))
|
||||
|
Loading…
Reference in New Issue
Block a user