anchor.diff:      (verify-environment)
   
       (cond
  -      (*scheck*
  +      (check-only
          (boot-world)
          (slog "Done.")
          (return-from main 0))
  
positive.code:     (setf *no-rent-check* t)
      (slog "Running in minimized mode & with no rent check and olc lock."))
    (when check-only
      (setf *scheck* t)
      (slog "Syntax check mode enabled."))
    (when no-rent
      (setf *no-rent-check* t)
  
negative.code: (defparameter *no-specials* nil)          ; Suppress ass. of special routines
  (defparameter *avail-descs* 0)            ; max descriptors available
  (defparameter *tics* 0)                   ; for extern checkpointing
  (defparameter *log-cmds* nil)             ; log cmds
  (defparameter *shutdown-count* -1)        ; shutdown countdown
  (defparameter *shutdown-idnum* -1)        ; idnum of person calling shutdown
  