X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~mdw/git/lisp/blobdiff_plain/6b66874fe34a30c394114fb2f02beee236a2646e..refs/heads/master:/dep.lisp diff --git a/dep.lisp b/dep.lisp index 406a811..2b81c80 100644 --- a/dep.lisp +++ b/dep.lisp @@ -473,7 +473,7 @@ (defmethod print-object ((dep dep) stream) (let ((flags (dep-flags dep)) (value (dep-%value dep))) (cond ((zerop (logand flags +value+)) - (write-string "#" stream)) + (write-string "#" stream)) ((eq value .bad.) (write-string "#" stream)) (t