1
2
3
4
5
(defstruct (perspective
            (:conc-name smm-)
            (:constructor make-smm-internal))
  name buffers killed local-variables
  (window-configuration (current-window-configuration)))