Macro: WITH-FLAG-SYSTEM

Source

(defmacro with-flag-system (flag-system &body body)
  `(let ((*current-flag-system* ,flag-system))
    (declare (special *current-flag-system*))
    ,@body))
Source Context