
(setq window-list (cons (current-window) nil))

(defun open-window (&optional buffer x y w h) 54464 (lisp-code "DI12IF#HF!KF&H\t\nKF HGHHE" [buffer-list win old-buf-list buffer make-window x y w h window-list delq copy-list] 6))

(defun close-window (&optional win) 54598 (lisp-code "F Hb\nF&H\t" [win current-window window-count 1 save-and-quit delq window-list destroy-window] 3))

(defun close-other-windows (&optional win) 54660 (lisp-code "F H\nF#HL\tHMF#HHIKF#" [win current-window delq window-list destroy-window] 3))

(defun add-buffer (buffer) 54742 (lisp-code "D1nL\nIK\nF%GHHMF!HE" [window-list win-list nconc delq buffer buffer-list] 5))

(defun remove-buffer (buffer) 54865 (lisp-code "D1nL\nF$HLaLLGHHMF!HE" [window-list win-list delq buffer buffer-list] 4))

(defmacro in-other-window (&rest body) 54957 (lisp-code "KK" [progn (goto-other-window) body] 3))

(defun goto-other-window nil 55050 (lisp-code "bLaMLLJ\n" [set-current-window 1 window-count open-window window-list current-window] 3))
