From b59116d4852b98693178ff0d98b99dc690514c69 Mon Sep 17 00:00:00 2001
From: Mark Wooding <mdw@distorted.org.uk>
Date: Sat, 30 Jun 2018 21:37:07 +0100
Subject: [PATCH] dep.lisp (%dep-value): Document why this is a separate
 function.

I almost committed a change which folded this into `dep-value' before
noticing that the latter is marked `inline'.
---
 dep.lisp | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/dep.lisp b/dep.lisp
index 3a1520f..ecd1628 100644
--- a/dep.lisp
+++ b/dep.lisp
@@ -228,7 +228,9 @@
 	       (progn (setf (dep-flags dep) flags) nil))))))
 
 (defun %dep-value (dep)
-  "Do the difficult work of retrieving the current value of a DEP."
+  "Do the difficult work of retrieving the current value of a DEP.
+
+   This is the unhappy path of `dep-value'."
   (force-dep-value dep)
   (when *evaluating-dep*
     (pushnew (dep-weak-pointer *evaluating-dep*) (dep-dependents dep))
-- 
2.11.0