anchor.diff:    (charms/ll:endwin)
     (dolist (window (cons *minibuf-window* (window-list)))
       (charms/ll:delscreen (window-win window)))
  -  (charms/ll:delscreen charms/ll:*stdscr*))
  +  (charms/ll:delscreen charms/ll:*stdscr*)
  +  (setq *running-p* nil))
   
   (defun lem-internal (args debug-p)
     (unwind-protect
  
positive.code: 
  (defvar *lem-error-file* "~/.lem-error")
  (defvar *initialized-p* nil)
  
  (defvar *exit*)
  
  
negative.code:     (lem-finallize)))
  
  (defun check-init ()
    (when *running-p*
      (error "~a is already initialized" *program-name*)))
  
  (defun lem (&rest args)
  