darkkirb/old-cross-binutils
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

gdb:

Browse source 
* gdb-code-style.el: New hook gdb-markup-hook
	and gdb-comment-hook.
This commit is contained in:
Yao Qi 2012-04-29 07:20:43 +00:00
parent 2746b0ef8d
commit 5977971a97
2 changed files with 35 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
gdb/ChangeLog
View file

@ -1,3 +1,8 @@
2012-04-29 Yao Qi <yao@codesourcery.com>
* gdb-code-style.el: New hook gdb-markup-hook
and gdb-comment-hook.
2012-04-28 Doug Evans <dje@google.com>
Initial support for Fission. http://gcc.gnu.org/wiki/DebugFission

31
gdb/gdb-code-style.el
View file

@ -45,4 +45,33 @@
(add-hook 'c-mode-common-hook 'gdb-include-hook)
;;; gdb-code-style.el ends here
;; Check marker up. If the marker up is missing, like,
;; warning ("abc");
;; The '(' and '"' will be highlight.
(defun gdb-markup-hook ()
(font-lock-add-keywords
nil
'(("\\<\\(warning\\|error\\)[ ]*\\(\([^_]\\)" 2 font-lock-warning-face t))))
(add-hook 'c-mode-common-hook 'gdb-markup-hook)
(defun gdb-comment-hook ()
;; A space should follow "/*", otherwise report a warning.
;; If the comment is like:
;; /*F. */
;; The 'F' will be highlight.
(font-lock-add-keywords
nil
'(("/\\*\\([^ ]\\).*\\*/" 1 font-lock-warning-face t)))
;; Two spaces are needed between "." and "*/". Report warning if there
;; is no space (".*/") or only one space (". */").
;; If the comment is like:
;; /* ABC. */ or /* ABC.*/
;; the '.' is highlight.
(font-lock-add-keywords
nil
'(("\\<[[:ascii:]]*\\(\\.[ ]?\\)\\*/" 1 font-lock-warning-face t)))
)
(add-hook 'c-mode-common-hook 'gdb-comment-hook)
;;; gdb-code-style.el ends here