diff options
| author | Stefan Monnier | 2019-04-30 14:56:29 -0400 |
|---|---|---|
| committer | Stefan Monnier | 2019-04-30 14:56:29 -0400 |
| commit | 910d170771ac74ab76d6dcb2dda3f3167e01b705 (patch) | |
| tree | eb0c73f92bdc096f689223e5a24f27f3c85f4ac1 | |
| parent | 325f51c84d9ad4d9776784bd324b347ffe4fe51b (diff) | |
| download | emacs-910d170771ac74ab76d6dcb2dda3f3167e01b705.tar.gz emacs-910d170771ac74ab76d6dcb2dda3f3167e01b705.zip | |
* lisp/progmodes/cc-engine.el: Silence minor compiler warnings
(c-restricted-<>-arglists, c-parse-and-markup-<>-arglists):
Move declaration before first use.
(c-after-change-unmark-raw-strings): Remove unused var `found-end`.
| -rw-r--r-- | lisp/progmodes/cc-engine.el | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/lisp/progmodes/cc-engine.el b/lisp/progmodes/cc-engine.el index 5d1b4bbed6e..a0459b9f2ae 100644 --- a/lisp/progmodes/cc-engine.el +++ b/lisp/progmodes/cc-engine.el | |||
| @@ -1812,7 +1812,7 @@ comment at the start of cc-engine.el for more info." | |||
| 1812 | (setcar c-sws-lit-limits (match-beginning 1)) | 1812 | (setcar c-sws-lit-limits (match-beginning 1)) |
| 1813 | (setq c-sws-lit-limits (cons (match-beginning 1) (match-end 1))))))) | 1813 | (setq c-sws-lit-limits (cons (match-beginning 1) (match-end 1))))))) |
| 1814 | 1814 | ||
| 1815 | (defun c-invalidate-sws-region-after-del (beg end old-len) | 1815 | (defun c-invalidate-sws-region-after-del (beg end _old-len) |
| 1816 | ;; Text has been deleted, OLD-LEN characters of it starting from position | 1816 | ;; Text has been deleted, OLD-LEN characters of it starting from position |
| 1817 | ;; BEG. END is typically eq to BEG. Should there have been a comment or | 1817 | ;; BEG. END is typically eq to BEG. Should there have been a comment or |
| 1818 | ;; CPP construct open at END before the deletion, check whether this | 1818 | ;; CPP construct open at END before the deletion, check whether this |
| @@ -5475,6 +5475,9 @@ comment at the start of cc-engine.el for more info." | |||
| 5475 | (setq c-bs-cache-limit | 5475 | (setq c-bs-cache-limit |
| 5476 | (min c-bs-cache-limit pos))) | 5476 | (min c-bs-cache-limit pos))) |
| 5477 | 5477 | ||
| 5478 | (defvar c-restricted-<>-arglists) ;FIXME: Move definition here? | ||
| 5479 | (defvar c-parse-and-markup-<>-arglists) ;FIXME: Move definition here? | ||
| 5480 | |||
| 5478 | (defun c-update-brace-stack (stack from to) | 5481 | (defun c-update-brace-stack (stack from to) |
| 5479 | ;; Given a brace-stack which has the value STACK at position FROM, update it | 5482 | ;; Given a brace-stack which has the value STACK at position FROM, update it |
| 5480 | ;; to its value at position TO, where TO is after (or equal to) FROM. | 5483 | ;; to its value at position TO, where TO is after (or equal to) FROM. |
| @@ -6488,9 +6491,6 @@ comment at the start of cc-engine.el for more info." | |||
| 6488 | (c-clear-<>-pair-props) | 6491 | (c-clear-<>-pair-props) |
| 6489 | (forward-char))))))) | 6492 | (forward-char))))))) |
| 6490 | 6493 | ||
| 6491 | (defvar c-restricted-<>-arglists) ;FIXME: Move definition here? | ||
| 6492 | (defvar c-parse-and-markup-<>-arglists) ;FIXME: Move definition here? | ||
| 6493 | |||
| 6494 | (defun c-restore-<>-properties (_beg _end _old-len) | 6494 | (defun c-restore-<>-properties (_beg _end _old-len) |
| 6495 | ;; This function is called as an after-change function. It restores the | 6495 | ;; This function is called as an after-change function. It restores the |
| 6496 | ;; category/syntax-table properties on template/generic <..> pairs between | 6496 | ;; category/syntax-table properties on template/generic <..> pairs between |
| @@ -6927,7 +6927,7 @@ comment at the start of cc-engine.el for more info." | |||
| 6927 | ;; This functions is called as an after-change function by virtue of its | 6927 | ;; This functions is called as an after-change function by virtue of its |
| 6928 | ;; membership of the C++ value of `c-before-font-lock-functions'. | 6928 | ;; membership of the C++ value of `c-before-font-lock-functions'. |
| 6929 | ;; (when (< beg end) | 6929 | ;; (when (< beg end) |
| 6930 | (c-save-buffer-state (found eoll state id found-beg found-end) | 6930 | (c-save-buffer-state (found eoll state id found-beg) |
| 6931 | ;; Has an inserted " swallowed up a R"(, turning it into "...R"(? | 6931 | ;; Has an inserted " swallowed up a R"(, turning it into "...R"(? |
| 6932 | (goto-char end) | 6932 | (goto-char end) |
| 6933 | (setq eoll (c-point 'eoll)) | 6933 | (setq eoll (c-point 'eoll)) |