diff options
| author | Stefan Monnier | 2017-06-25 18:47:57 -0400 |
|---|---|---|
| committer | Stefan Monnier | 2017-06-25 18:47:57 -0400 |
| commit | ebb4e61c594ae0166c4ac7a92e3a71ebcab68b99 (patch) | |
| tree | bbe010d4754225d15979285b02f221a4205e8b57 | |
| parent | b2bff45d0f27b3d8c3dfbf6df51dd7adbcb9d9fc (diff) | |
| download | emacs-ebb4e61c594ae0166c4ac7a92e3a71ebcab68b99.tar.gz emacs-ebb4e61c594ae0166c4ac7a92e3a71ebcab68b99.zip | |
* lisp/progmodes/cc-fonts.el: Remove/mark unused vars
(c-font-lock-declarators): Remove unused vars `id-end', `paren-depth',
and `brackets-after-id'.
(c-font-lock-objc-methods): Mark unused args.
| -rw-r--r-- | lisp/progmodes/cc-fonts.el | 13 |
1 files changed, 6 insertions, 7 deletions
diff --git a/lisp/progmodes/cc-fonts.el b/lisp/progmodes/cc-fonts.el index 98a4856045c..00812530357 100644 --- a/lisp/progmodes/cc-fonts.el +++ b/lisp/progmodes/cc-fonts.el | |||
| @@ -777,7 +777,8 @@ casts and declarations are fontified. Used on level 2 and higher." | |||
| 777 | (c-backward-syntactic-ws) | 777 | (c-backward-syntactic-ws) |
| 778 | (setq id-end (point)) | 778 | (setq id-end (point)) |
| 779 | (< (skip-chars-backward | 779 | (< (skip-chars-backward |
| 780 | ,(c-lang-const c-symbol-chars)) 0)) | 780 | ,(c-lang-const c-symbol-chars)) |
| 781 | 0)) | ||
| 781 | (not (get-text-property (point) 'face))) | 782 | (not (get-text-property (point) 'face))) |
| 782 | (c-put-font-lock-face (point) id-end | 783 | (c-put-font-lock-face (point) id-end |
| 783 | c-reference-face-name) | 784 | c-reference-face-name) |
| @@ -1013,13 +1014,11 @@ casts and declarations are fontified. Used on level 2 and higher." | |||
| 1013 | 1014 | ||
| 1014 | ;;(message "c-font-lock-declarators from %s to %s" (point) limit) | 1015 | ;;(message "c-font-lock-declarators from %s to %s" (point) limit) |
| 1015 | (c-fontify-types-and-refs | 1016 | (c-fontify-types-and-refs |
| 1016 | ((pos (point)) next-pos id-start id-end | 1017 | ((pos (point)) next-pos id-start |
| 1017 | decl-res | 1018 | decl-res |
| 1018 | paren-depth | ||
| 1019 | id-face got-type got-init | 1019 | id-face got-type got-init |
| 1020 | c-last-identifier-range | 1020 | c-last-identifier-range |
| 1021 | (separator-prop (if types 'c-decl-type-start 'c-decl-id-start)) | 1021 | (separator-prop (if types 'c-decl-type-start 'c-decl-id-start))) |
| 1022 | brackets-after-id) | ||
| 1023 | 1022 | ||
| 1024 | ;; The following `while' fontifies a single declarator id each time round. | 1023 | ;; The following `while' fontifies a single declarator id each time round. |
| 1025 | ;; It loops only when LIST is non-nil. | 1024 | ;; It loops only when LIST is non-nil. |
| @@ -1036,7 +1035,7 @@ casts and declarations are fontified. Used on level 2 and higher." | |||
| 1036 | (forward-char) | 1035 | (forward-char) |
| 1037 | (c-forward-syntactic-ws) | 1036 | (c-forward-syntactic-ws) |
| 1038 | (looking-at "[*&]"))) | 1037 | (looking-at "[*&]"))) |
| 1039 | (not (car (cddr decl-res))) ; brackets-after-id | 1038 | (not (car (cddr decl-res))) |
| 1040 | (or (not (c-major-mode-is 'c++-mode)) | 1039 | (or (not (c-major-mode-is 'c++-mode)) |
| 1041 | (save-excursion | 1040 | (save-excursion |
| 1042 | (let (c-last-identifier-range) | 1041 | (let (c-last-identifier-range) |
| @@ -2502,7 +2501,7 @@ need for `c++-font-lock-extra-types'.") | |||
| 2502 | limit | 2501 | limit |
| 2503 | "[-+]" | 2502 | "[-+]" |
| 2504 | nil | 2503 | nil |
| 2505 | (lambda (match-pos inside-macro &optional top-level) | 2504 | (lambda (_match-pos _inside-macro &optional _top-level) |
| 2506 | (forward-char) | 2505 | (forward-char) |
| 2507 | (c-font-lock-objc-method)))) | 2506 | (c-font-lock-objc-method)))) |
| 2508 | nil) | 2507 | nil) |