diff options
| author | Alan Mackenzie <acm@muc.de> | 2017-02-18 16:01:15 +0000 | 
|---|---|---|
| committer | Alan Mackenzie <acm@muc.de> | 2017-02-18 16:01:15 +0000 | 
| commit | 861ff2ba2cfc19065b13bf9b9670b44e1496c64e (patch) | |
| tree | 77d1c2572d929d0f2d0ae0f7de9da559a65dd739 /lisp/progmodes/cc-langs.el | |
| parent | 7d15daf713f7fe2d067a10812cdfcb32963f596e (diff) | |
| download | emacs-861ff2ba2cfc19065b13bf9b9670b44e1496c64e.tar.gz | |
Fix edebug-spec on c-lang-defvar.
This allows c-lang-defvars with the symbol 'dont-doc in the place of the
optional documentation to be instrumented for edebug.
lisp/progmodes/cc-langs.el (top-level): Amend the edebug-spec for
c-lang-defvar.
(c-opt-identifier-concat-key, c-decl-prefix-or-start-re): remove redundant
'dont-doc.
Diffstat (limited to 'lisp/progmodes/cc-langs.el')
| -rw-r--r-- | lisp/progmodes/cc-langs.el | 8 | 
1 files changed, 3 insertions, 5 deletions
| diff --git a/lisp/progmodes/cc-langs.el b/lisp/progmodes/cc-langs.el index 037404696d6..3b455fc0908 100644 --- a/lisp/progmodes/cc-langs.el +++ b/lisp/progmodes/cc-langs.el @@ -204,7 +204,7 @@ the evaluated constant value at compile time."  ; (eval-after-load "edebug" ; 2006-07-09: def-edebug-spec is now in subr.el.  ;  '  (def-edebug-spec c-lang-defvar -  (&define name def-form &optional stringp)) ;) +  (&define name def-form &optional &or ("quote" symbolp) stringp))  ;; Suppress "might not be defined at runtime" warning.  ;; This file is only used when compiling other cc files. @@ -712,8 +712,7 @@ This value is by default merged into `c-operators'."        (when ops  	(c-make-keywords-re 'appendable ops))))  (c-lang-defvar c-opt-identifier-concat-key -  (c-lang-const c-opt-identifier-concat-key) -  'dont-doc) +  (c-lang-const c-opt-identifier-concat-key))  (c-lang-defconst c-opt-identifier-concat-key-depth    ;; Number of regexp grouping parens in `c-opt-identifier-concat-key'. @@ -2975,8 +2974,7 @@ constructs."  		(c-make-keywords-re t (c-lang-const c-decl-start-kwds)))        (c-lang-const c-decl-prefix-re)))  (c-lang-defvar c-decl-prefix-or-start-re -  (c-lang-const c-decl-prefix-or-start-re) -  'dont-doc) +  (c-lang-const c-decl-prefix-or-start-re))  (c-lang-defconst c-cast-parens    ;; List containing the paren characters that can open a cast, or nil in | 
