Lines Matching +defs:language +defs:info +defs:alist
35 ;; (see the GDB Graphical Interface section in the Emacs info manual).
44 ;; section in the GDB info manual.
113 (defvar gdb-current-language nil)
125 (defvar gdb-location-alist nil
131 (defvar gdb-macro-info nil
132 "Non-nil if GDB knows that the inferior includes preprocessor macro info.")
297 (defcustom gdb-cpp-define-alist-program "gcc -E -dM -"
303 Set `gdb-cpp-define-alist-flags' for any include paths or
309 (defcustom gdb-cpp-define-alist-flags ""
310 "Preprocessor flags for `gdb-cpp-define-alist-program'."
382 (defvar gdb-define-alist nil "Alist of #define directives for GUD tooltips.")
384 (defun gdb-create-define-alist ()
385 "Create an alist of #define directives for GUD tooltips."
393 (concat gdb-cpp-define-alist-program " "
394 gdb-cpp-define-alist-flags)))))
396 (setq gdb-define-alist nil)
399 (push (cons name define) gdb-define-alist))))
442 (make-local-variable 'gdb-define-alist)
443 (gdb-create-define-alist)
444 (add-hook 'after-save-hook 'gdb-create-define-alist nil t))))))
540 gdb-current-language nil
552 gdb-location-alist nil
555 gdb-macro-info nil
571 ;; Hack to see test for GDB 6.4+ (-stack-info-frame was implemented in 6.4)
572 (gdb-enqueue-input (list "server interpreter mi -stack-info-frame\n"
583 (gdb-enqueue-input (list (concat gdb-server-prefix "info sources\n")
598 (gdb-enqueue-input (list "server info source\n" 'gdb-source-info))
721 (if (and (string-equal gdb-current-language "c")
1051 (special-display-frame-alist gdb-frame-parameters))
1683 ;; Breakpoint buffer : This displays the output of `info breakpoints'.
1698 "server info breakpoints\n"
1703 gdb-info-breakpoints-handler
1705 gdb-info-breakpoints-custom)
1796 (defun gdb-info-breakpoints-custom ()
1833 (setq file (cdr (assoc bptno gdb-location-alist))))
1853 (list (concat gdb-server-prefix "info source\n")
1947 (special-display-frame-alist gdb-frame-parameters))
2026 (cdr (assoc bptno gdb-location-alist)))))
2054 (concat "server info stack " (number-to-string gdb-max-frames) "\n")
2055 gdb-info-stack-handler
2056 gdb-info-stack-custom)
2058 (defun gdb-info-stack-custom ()
2123 (setq fringe-indicator-alist
2140 (special-display-frame-alist gdb-frame-parameters))
2200 (concat gdb-server-prefix "info threads\n")
2201 gdb-info-threads-handler
2202 gdb-info-threads-custom)
2204 (defun gdb-info-threads-custom ()
2230 (special-display-frame-alist gdb-frame-parameters))
2293 gdb-server-prefix "info " (if gdb-all-registers "all-") "registers\n")
2294 gdb-info-registers-handler
2295 gdb-info-registers-custom)
2297 (defun gdb-info-registers-custom ()
2365 (special-display-frame-alist gdb-frame-parameters))
2690 (special-display-frame-alist
2706 "server info locals\n"
2707 gdb-info-locals-handler)
2736 (defun gdb-info-locals-handler ()
2763 (run-hooks 'gdb-info-locals-hook))
2802 (special-display-frame-alist gdb-frame-parameters))
2897 (special-display-frame-alist
2979 (kill-local-variable 'gdb-define-alist))))))
2983 (setq fringe-indicator-alist '((overlay-arrow . right-triangle)))
2991 (remove-hook 'after-save-hook 'gdb-create-define-alist t))
2993 (defun gdb-source-info ()
3001 (if (search-forward "Includes preprocessor macro info." nil t)
3002 (setq gdb-macro-info t))
3017 (delete (cons bptno "File not found") gdb-location-alist)
3018 (push (cons bptno (match-string 0)) gdb-location-alist))
3020 (unless (assoc bptno gdb-location-alist)
3021 (push (cons bptno "File not found") gdb-location-alist)
3045 ;;Pre GDB 6.3 "info sources" doesn't give absolute file name.
3203 (setq fringe-indicator-alist
3287 (special-display-frame-alist gdb-frame-parameters))
3323 (list (concat gdb-server-prefix "info frame\n") 'gdb-frame-handler))
3354 (setq fringe-indicator-alist
3360 (if (re-search-forward " source language \\(\\S-+\\)\." nil t)
3361 (setq gdb-current-language (match-string 1)))
3383 (make-local-variable 'gdb-define-alist)
3384 (gdb-create-define-alist)
3385 (add-hook 'after-save-hook 'gdb-create-define-alist nil t)))))