anchor.diff:    (entry-points nil :type list)
     ;; A list warning handlers.
     (warning-handlers nil :type list)
  -  ;; The compile mode. One of :dbg, :opt, :fastbuild, or :load.
  +  ;; The compile mode. One of :dbg, :opt, or :fastbuild.
     (compilation-mode nil :type compilation-mode)
     ;; A list of failures.
     (failures nil :type list)
  
positive.code:                (*current-source-file* name)
                 (*readtable* (setup-readtable readtable))
                 (*action* action))
            (set-compilation-mode load-mode)
            (cond (muffle-warnings
                   (with-all-warnings-muffled
                     ;; TODO(czak): use bazel.warning:redefine-warning.
  
negative.code:    :executable executable
     :verbose (plusp *verbose*)))
  
  (defun set-optimization-mode (optimization-mode)
    "Proclaim the optimization settings based on the OPTIMIZATION-MODE."
    (declare (type optimization-mode optimization-mode))
  
    (vvv "Set optimization mode: ~S" optimization-mode)
  
    (destructuring-bind (spEed Debug saFety space Compilation-speed)
        (ecase optimization-mode ; E D F   C
          (:load                '(1 1 1 1 3))
          ((:fastbuild nil)     '(1 2 3 1 1))
          (:opt                 '(3 0 0 1 1))
          (:dbg                 '(1 3 3 1 1)))
  
      (set-interpret-mode optimization-mode)
  
      ;; Cause bodies of macroexpanders, including MACROLET and DEFINE-COMPILER-MACRO,
      ;; to be compiled in a policy in which these qualities override the global policy.
  