0.8.16.2: TYPE-ERROR for ERROR
[sbcl.git] / src / code / dyncount.lisp
index 3761a48..a8071c0 100644 (file)
@@ -186,7 +186,7 @@ comments from CMU CL:
   #!+sb-doc
   "Return a hash-table mapping string VOP names to VOP-STATS structures
    describing the VOPs executed. If clear is true, then reset all counts to
-   zero as a side-effect."
+   zero as a side effect."
   (locally
       (declare (optimize (speed 3) (safety 0))
               (inline sb!vm::map-allocated-objects))
@@ -531,8 +531,7 @@ comments from CMU CL:
             classes)))
         (compared (if compare
                       (compare-stats compensated compare)
-                      compensated))
-        (*gc-notify-stream* nil))
+                      compensated)))
     (multiple-value-bind (total-count total-cost) (cost-summary compensated)
       (multiple-value-bind (compare-total-count compare-total-cost)
          (when compare (cost-summary compare))