X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcode%2Ftime.lisp;h=8cf2e00c61c95e3eee6e90031f69de1d2e9f9093;hb=8a19ff566e3a1a43cb3b2d11d2781a1c89981f43;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