X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;ds=sidebyside;f=src%2Fcode%2Ftime.lisp;h=8cf2e00c61c95e3eee6e90031f69de1d2e9f9093;hb=ead91228b6f2c70eb93978885f213e89b765e851;hp=6cdb53d8c91cc845277aa49141d44c4f73bc3792;hpb=9a82b26397de09d67372f34158090c2284fd1411;p=sbcl.git

diff --git a/src/code/time.lisp b/src/code/time.lisp
index 6cdb53d..8cf2e00 100644
--- a/src/code/time.lisp
+++ b/src/code/time.lisp
@@ -257,8 +257,10 @@ format."
 
 (defvar *gc-run-time* 0
   #!+sb-doc
-  "the total CPU time spent doing garbage collection (as reported by
-   GET-INTERNAL-RUN-TIME)")
+  "Total CPU time spent doing garbage collection (as reported by
+GET-INTERNAL-RUN-TIME.) Initialized to zero on startup. It is safe to bind
+this to zero in order to measure GC time inside a certain section of code, but
+doing so may interfere with results reported by eg. TIME.")
 (declaim (type index *gc-run-time*))
 
 (defun print-time (&key real-time-ms user-run-time-us system-run-time-us