# HG changeset patch # User Nick Roberts # Date 1124184731 0 # Node ID e1cdc6178b3e6c0fcc93c852a03811c36f0216b9 # Parent b2d245bb54da0fb98fc882191fa7f43f468193ea (toggle-gdb-use-inferior-io-buffer): Comment use of defadvice. diff -r b2d245bb54da -r e1cdc6178b3e lisp/progmodes/gdb-ui.el --- a/lisp/progmodes/gdb-ui.el Tue Aug 16 09:31:31 2005 +0000 +++ b/lisp/progmodes/gdb-ui.el Tue Aug 16 09:32:11 2005 +0000 @@ -58,7 +58,7 @@ ;; using a macro: ;; ;; #ifdef UNBUFFERED -;; setvbuf(stdout,(char *)NULL, _IONBF,0); +;; setvbuf (stdout, (char *) NULL, _IONBF, 0); ;; #endif ;; ;; and compiling with -DUNBUFFERED while debugging. @@ -2190,6 +2190,7 @@ (define-key gud-menu-map [ui] `(menu-item "GDB-UI" ,menu :visible (eq gud-minor-mode 'gdba))) (define-key menu [gdb-use-inferior-io] + ;; See defadvice below. (menu-bar-make-toggle toggle-gdb-use-inferior-io-buffer gdb-use-inferior-io-buffer "Separate inferior IO" "Use separate IO %s" @@ -2202,6 +2203,7 @@ '(menu-item "Restore Window Layout" gdb-restore-windows :help "Restore standard layout for debug session."))) +;; This function is defined above through a macro. (defadvice toggle-gdb-use-inferior-io-buffer (after gdb-kill-io-buffer activate) (unless gdb-use-inferior-io-buffer (kill-buffer (gdb-inferior-io-name))))