anchor.diff:    ;; FIXME
     ;;
     ;; TBD - Wrapping for *BREAK-ON-SIGNALS* and *DEBUGGER-HOOK*
  -  (with-symbols (register-condition c whence restart)
  +  (with-symbols (register-condition c whence restart values)
       (let ((tabl (mapcar #'(lambda (typ)
                               (declare (type symbol typ))
                               (cons typ
  
positive.code: ;;   when eval w/ SBCL 1.4.16.debian, SLIME/Swank 4.19.0-2-amd64, Emacs 26.1
  ;;
  ;; It "Works-Out OK" when input directly to the REPL however ....
  
  ))
  
  
negative.code:                     (unless (find ,c (the (array t (*)) ,whence) :test #'eq)
                        (vector-push-extend ,c ,whence))))
             (let (#+NIL (*break-on-signals* (quote (or ,@types)))
                         ,values
                         )
               (handler-bind ,(mapcar #'(lambda (spec)
                                          (destructuring-bind (typ . storage) spec
  