From 0a311c7a905f4bfd51857e88dd1bc640fbdb7dee Mon Sep 17 00:00:00 2001 From: Francois-Rene Rideau <fare@tunes.org> Date: Mon, 27 Mar 2017 22:09:12 -0400 Subject: [PATCH] Make asdf/contrib/debug-plan loadable as system And add more debug information. --- contrib/debug-plan.lisp | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/contrib/debug-plan.lisp b/contrib/debug-plan.lisp index a2378f9af..f488b2894 100644 --- a/contrib/debug-plan.lisp +++ b/contrib/debug-plan.lisp @@ -1,3 +1,5 @@ +(defpackage :asdf/contrib/plan (:use :cl)) ;; dummy, for use as package-inferred-system + (in-package :asdf/plan) ;; NB: Whenever compute-action-stamp is changed, this file must be updated @@ -45,7 +47,7 @@ (action-path (make-action do dc)))) status) (t - (DBG "compute-action-stamp: forced by out of date dependency" (action-path (make-action o c)) action-status) + (DBG "compute-action-stamp: forced by out of date dependency" (action-path (make-action o c)) (action-path (make-action do dc)) action-status) (return (values nil nil)))))) +status-good+)) (dep-stamp (status-stamp dep-status))) -- GitLab