summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
authorAlan Mackenzie <acm@muc.de>2018-11-24 10:31:53 +0000
committerAlan Mackenzie <acm@muc.de>2018-11-24 10:31:53 +0000
commit9877c03293241091ba4069002d4dc4d74b557414 (patch)
treea177500da6131f25060d7ce9d40aafbd2bddab27 /lisp
parent25a4205271f5550a34b5cfbf484fe7f16410d1f6 (diff)
downloademacs-9877c03293241091ba4069002d4dc4d74b557414.tar.gz
Fix bug #33416, where typing a ) in a comment at EOB caused a loop (CC Mode).
* lisp/progmodes/cc-mode.el (c-fl-decl-start): A c-forward-syntactic-ws leaves point inside whitespace when moving over a comment at EOB which has no terminating LF. Check this possibility and correct for it.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/progmodes/cc-mode.el5
1 files changed, 4 insertions, 1 deletions
diff --git a/lisp/progmodes/cc-mode.el b/lisp/progmodes/cc-mode.el
index 664f01012b8..424cde52474 100644
--- a/lisp/progmodes/cc-mode.el
+++ b/lisp/progmodes/cc-mode.el
@@ -1512,7 +1512,10 @@ Note that this is a strict tail, so won't match, e.g. \"0x....\".")
(c-syntactic-skip-backward "^;{}" bod-lim t)
(> (point) bod-lim)
(progn (c-forward-syntactic-ws)
- (setq bo-decl (point))
+ ;; Have we got stuck in a comment at EOB?
+ (not (and (eobp)
+ (c-literal-start))))
+ (progn (setq bo-decl (point))
(or (not (looking-at c-protection-key))
(c-forward-keyword-clause 1)))
(progn