anchor.diff:               :retry)
               ((= code resize-code)
                ;; for resizing display
  -             (setf *resizing* t)
  +             (setf (now-resizing) t)
                :resize)
               ((= code mouse-code)
                ;; for mouse
                (multiple-value-bind (bstate x y z id)
                    (charms/ll:getmouse)
  +               (declare (ignore z id))
                  (mouse-event-proc bstate x y)))
               ((= code abort-code)
                (setf esc-key nil)
  
positive.code:             (if (lem-base:wide-char-p (code-char code)) 2 1)))))
  (defmethod (setf reserved-last-lines) (v (wt windows-term-setting))
    (setf (windows-term-setting-reserved-last-lines wt) v)
    (setf *resizing* t)
    (lem::change-display-size-hook)
    v)
  (setf (windows-term-type) *windows-term-type*)
  
negative.code:   *windows-term-type*)
  (defun (setf windows-term-type) (v)
    (setf *windows-term-type* v)
    (update-windows-term-setting)
    v)
  
  ;; windows terminal setting
  