dep.lisp: Report out-of-date deps as being `stale'.

[lisp] / dep.lisp

diff --git a/dep.lisp b/dep.lisp
index 406a8110d6ab0e771063663be8d4481993623f5a..2b81c80ad45d1792ba711aa5f72b81e0b5923473 100644 (file)
--- 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+))
       (let ((flags (dep-flags dep))
            (value (dep-%value dep)))
        (cond ((zerop (logand flags +value+))

-              (write-string "#<out-of-date>" stream))
+              (write-string "#<stale>" stream))

              ((eq value .bad.)
               (write-string "#<bad>" stream))
              (t
              ((eq value .bad.)
               (write-string "#<bad>" stream))
              (t