anchor.diff:                 (*current-source-file* name)
                  (*readtable* (setup-readtable readtable))
                  (*action* action))
  -          (set-compilation-mode load-mode)
  +          (set-optimization-mode load-mode)
             (cond (muffle-warnings
                    (with-all-warnings-muffled
                      ;; TODO(czak): use bazel.warning:redefine-warning.
  
positive.code: ;;;
  
  (deftype compilation-mode () '(member :opt :fastbuild :dbg))
  (deftype compile-load-mode () '(member :opt :fastbuild :dbg :load))
  
  (defstruct action
    "The bazel-lisp action contains the input parameters and
  
negative.code:       (mapc #'process-file* warnings)
  
        (verbose "Finalizing the ~A action..." command)
        (set-optimization-mode (action-compilation-mode action))
        (finish-action action command))))
  
  (defmethod execute-command ((command (eql :compile)) &rest args)
  