aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorAlan Mackenzie2007-02-02 23:06:41 +0000
committerAlan Mackenzie2007-02-02 23:06:41 +0000
commit10489fcbefcfe810f0e691b1816611cae7a3ec36 (patch)
tree388adb579b550c726009b2892a00f931a630dda0
parent7bee28dc920e0a34a30553936e9f074c06d6fcec (diff)
downloademacs-10489fcbefcfe810f0e691b1816611cae7a3ec36.tar.gz
emacs-10489fcbefcfe810f0e691b1816611cae7a3ec36.zip
(c-in-knr-argdecl): Slight correction for, e.g. "void (*hdone)();" in a
k&r list. (No WS between adjacent paren groups).
-rw-r--r--lisp/progmodes/cc-engine.el10
1 files changed, 5 insertions, 5 deletions
diff --git a/lisp/progmodes/cc-engine.el b/lisp/progmodes/cc-engine.el
index f05d6632473..f69382c9d70 100644
--- a/lisp/progmodes/cc-engine.el
+++ b/lisp/progmodes/cc-engine.el
@@ -6256,13 +6256,13 @@ comment at the start of cc-engine.el for more info."
6256 6256
6257 (catch 'knr 6257 (catch 'knr
6258 (while t ; go round one paren/bracket construct each time round. 6258 (while t ; go round one paren/bracket construct each time round.
6259 (or (c-syntactic-skip-backward "^)]}") 6259 (c-syntactic-skip-backward "^)]}")
6260 (throw 'knr nil)) ; no more bpb pairs left.
6261 (cond ((eq (char-before) ?\)) 6260 (cond ((eq (char-before) ?\))
6262 (setq after-rparen (point))) 6261 (setq after-rparen (point)))
6263 ((eq (char-before) ?\}) 6262 ((eq (char-before) ?\])
6264 (throw 'knr nil)) 6263 (setq after-rparen nil))
6265 (t (setq after-rparen nil))) ; "]" 6264 (t ; either } (hit previous defun) or no more parens/brackets
6265 (throw 'knr nil)))
6266 6266
6267 (if after-rparen 6267 (if after-rparen
6268 ;; We're inside a paren. Could it be our argument list....? 6268 ;; We're inside a paren. Could it be our argument list....?