diff options
Diffstat (limited to 'lisp/progmodes/cpp.el')
| -rw-r--r-- | lisp/progmodes/cpp.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/progmodes/cpp.el b/lisp/progmodes/cpp.el index bf8458e725a..0a51add68b6 100644 --- a/lisp/progmodes/cpp.el +++ b/lisp/progmodes/cpp.el | |||
| @@ -234,7 +234,8 @@ A prefix arg suppresses display of that buffer." | |||
| 234 | (cpp-progress-message "Parsing...") | 234 | (cpp-progress-message "Parsing...") |
| 235 | (while (re-search-forward cpp-parse-regexp nil t) | 235 | (while (re-search-forward cpp-parse-regexp nil t) |
| 236 | (cpp-progress-message "Parsing...%d%%" | 236 | (cpp-progress-message "Parsing...%d%%" |
| 237 | (/ (* 100 (- (point) (point-min))) (buffer-size))) | 237 | (floor (* 100.0 (- (point) (point-min))) |
| 238 | (buffer-size))) | ||
| 238 | (let ((match (buffer-substring (match-beginning 0) (match-end 0)))) | 239 | (let ((match (buffer-substring (match-beginning 0) (match-end 0)))) |
| 239 | (cond ((or (string-equal match "'") | 240 | (cond ((or (string-equal match "'") |
| 240 | (string-equal match "\"")) | 241 | (string-equal match "\"")) |