anchor.diff:                                                     (let ((,restart
                                                             (find-restart 'continue ,c)))
                                                        (when ,restart
  -                                                       (invoke-restart ,restart ,c)))))))
  +                                                       (invoke-restart ,restart #+NIL ,c)))))))
                                       tabl)
                  ;; TBD - Wrapped/impl-specific binding for *DEBUGGER-HOOK*
                  ;; so as to capture all implementation-wrapped conditions
  
positive.code:   )
  
  )
  
negative.code: 
  ;; TBD - cf. LAMBDA* => COMPILE
  
  #+TBD
  (defmacro with-encapsulated-conditions ((&rest types) &body forms)
    ;; FIXME
    ;;
  