Mercurial > emacs
comparison lisp/progmodes/cc-engine.el @ 105206:60cf2b54da00
cc-langs.el (c-nonlabel-token-key): Allow quoted character constants (as
case labels).
cc-engine.el (c-beginning-of-statement-1): Correct buggy bracketing.
author | Alan Mackenzie <acm@muc.de> |
---|---|
date | Sat, 26 Sep 2009 09:18:41 +0000 |
parents | eee42a220506 |
children | 098f8a47a308 |
comparison
equal
deleted
inserted
replaced
105205:3603226f3cf8 | 105206:60cf2b54da00 |
---|---|
1065 (goto-char pos) | 1065 (goto-char pos) |
1066 (when (and after-case:-pos | 1066 (when (and after-case:-pos |
1067 (not (eq ret 'beginning)) | 1067 (not (eq ret 'beginning)) |
1068 (looking-at c-case-kwds-regexp)) | 1068 (looking-at c-case-kwds-regexp)) |
1069 (if (< after-case:-pos start) | 1069 (if (< after-case:-pos start) |
1070 (setq pos after-case:-pos) | 1070 (setq pos after-case:-pos)) |
1071 (setq ret 'label))) | 1071 (if (eq ret 'same) |
1072 (setq ret 'label))) | |
1072 | 1073 |
1073 ;; Skip over the unary operators that can start the statement. | 1074 ;; Skip over the unary operators that can start the statement. |
1074 (while (progn | 1075 (while (progn |
1075 (c-backward-syntactic-ws) | 1076 (c-backward-syntactic-ws) |
1076 ;; protect AWK post-inc/decrement operators, etc. | 1077 ;; protect AWK post-inc/decrement operators, etc. |