# HG changeset patch # User Alan Mackenzie # Date 1170457601 0 # Node ID 33cf1027eb428ebd86b8c18500a01b77e9fd2110 # Parent b94d16f632ee1d08de3de79833cd447a397fb05e (c-in-knr-argdecl): Slight correction for, e.g. "void (*hdone)();" in a k&r list. (No WS between adjacent paren groups). diff -r b94d16f632ee -r 33cf1027eb42 lisp/progmodes/cc-engine.el --- 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....?