Mercurial > emacs
changeset 75623:33cf1027eb42
(c-in-knr-argdecl): Slight correction for, e.g. "void (*hdone)();" in a
k&r list. (No WS between adjacent paren groups).
author | Alan Mackenzie <acm@muc.de> |
---|---|
date | Fri, 02 Feb 2007 23:06:41 +0000 |
parents | b94d16f632ee |
children | 287a9e827176 |
files | lisp/progmodes/cc-engine.el |
diffstat | 1 files changed, 5 insertions(+), 5 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/progmodes/cc-engine.el Fri Feb 02 23:02:04 2007 +0000 +++ b/lisp/progmodes/cc-engine.el Fri Feb 02 23:06:41 2007 +0000 @@ -6256,13 +6256,13 @@ (catch 'knr (while t ; go round one paren/bracket construct each time round. - (or (c-syntactic-skip-backward "^)]}") - (throw 'knr nil)) ; no more bpb pairs left. + (c-syntactic-skip-backward "^)]}") (cond ((eq (char-before) ?\)) (setq after-rparen (point))) - ((eq (char-before) ?\}) - (throw 'knr nil)) - (t (setq after-rparen nil))) ; "]" + ((eq (char-before) ?\]) + (setq after-rparen nil)) + (t ; either } (hit previous defun) or no more parens/brackets + (throw 'knr nil))) (if after-rparen ;; We're inside a paren. Could it be our argument list....?