Silence some output of make-target-2 if --noinform was given

make-target-2-load.lisp

@@ -488,6 +488,7 @@ Please check that all strings which were not recognizable to the compiler
                (and (boundp symbol) (not (keywordp symbol)))))))))
    :verbose nil :print nil)
   (unintern 'sb-impl::shake-packages 'sb-impl)
+  (when (zerop (extern-alien "lisp_startup_options" char))
     (let ((sum-delta-ext 0)
           (sum-delta-int 0))
       (format t "~&~26TExternal   |    Internal~%")
@@ -505,7 +506,7 @@ Please check that all strings which were not recognizable to the compiler
                   ext delta-ext int delta-int)))
       (format t "~28t (~5@d) |       (~5@d) = (~d)~%"
               sum-delta-ext sum-delta-int
-            (+ sum-delta-ext sum-delta-int))))
+              (+ sum-delta-ext sum-delta-int)))))
 
 (scan-format-control-strings)
 

src/code/cold-init.lisp

@@ -190,9 +190,10 @@
   ;; The readtable needs to be initialized for printing symbols early,
   ;; which is useful for debugging.
   (!readtable-cold-init)
+  (unless (!c-runtime-noinform-p)
     (write-string "Checking symbol printer: ")
     (write 't)
-  (terpri)
+    (terpri))
 
   ;; *RAW-SLOT-DATA* is essentially a compile-time constant
   ;; but isn't dumpable as such because it has functions in it.

src/cold/warm.lisp

@@ -240,7 +240,8 @@ sb-kernel::
       (dolist (cell (sort list #'> :key #'car))
         (format output "~7d ~s~%" (car cell) (cdr cell))))))
 
-(when (sb-sys:find-dynamic-foreign-symbol-address "tot_gc_nsec")
+(when (and (sb-sys:find-dynamic-foreign-symbol-address "tot_gc_nsec")
+           (zerop (extern-alien "lisp_startup_options" char)))
   (let* ((run-sec (/ (get-internal-real-time) internal-time-units-per-second))
          (gc-nsec (extern-alien "tot_gc_nsec" unsigned))
          (gc-msec (/ (float gc-nsec) 1000000)))