Commit b414f371 authored by Juanma Barranquero's avatar Juanma Barranquero
Browse files

(c-crosses-statement-barrier-p): Fix typo in docstring.

parent 10cfe02c
...@@ -604,7 +604,7 @@ comment at the start of cc-engine.el for more info." ...@@ -604,7 +604,7 @@ comment at the start of cc-engine.el for more info."
;; (e.g. if). ;; (e.g. if).
;; ;;
;; ;;
;; The following diagram briefly outlines the PDA. ;; The following diagram briefly outlines the PDA.
;; ;;
;; Common state: ;; Common state:
;; "else": Push state, goto state `else'. ;; "else": Push state, goto state `else'.
...@@ -1079,7 +1079,7 @@ single `?' is found, then `c-maybe-labelp' is cleared. ...@@ -1079,7 +1079,7 @@ single `?' is found, then `c-maybe-labelp' is cleared.
For AWK, a statement which is terminated by an EOL (not a \; or a }) is For AWK, a statement which is terminated by an EOL (not a \; or a }) is
regarded as having a \"virtual semicolon\" immediately after the last token on regarded as having a \"virtual semicolon\" immediately after the last token on
the line. If this virtual semicolon is _at_ from, the function recognises it. the line. If this virtual semicolon is _at_ from, the function recognizes it.
Note that this function might do hidden buffer changes. See the Note that this function might do hidden buffer changes. See the
comment at the start of cc-engine.el for more info." comment at the start of cc-engine.el for more info."
...@@ -1916,7 +1916,7 @@ comment at the start of cc-engine.el for more info." ...@@ -1916,7 +1916,7 @@ comment at the start of cc-engine.el for more info."
(defun c-partial-ws-p (beg end) (defun c-partial-ws-p (beg end)
;; Is the region (beg end) WS, and is there WS (or BOB/EOB) next to the ;; Is the region (beg end) WS, and is there WS (or BOB/EOB) next to the
;; region? This is a "heuristic" function. ..... ;; region? This is a "heuristic" function. .....
;; ;;
;; The motivation for the second bit is to check whether removing this ;; The motivation for the second bit is to check whether removing this
;; region would coalesce two symbols. ;; region would coalesce two symbols.
;; ;;
...@@ -3291,7 +3291,7 @@ comment at the start of cc-engine.el for more info." ...@@ -3291,7 +3291,7 @@ comment at the start of cc-engine.el for more info."
;; The workaround for this is for the AWK Mode initialisation to switch the ;; The workaround for this is for the AWK Mode initialisation to switch the
;; defalias for c-in-literal to c-slow-in-literal. This will slow down other ;; defalias for c-in-literal to c-slow-in-literal. This will slow down other
;; cc-modes in Xemacs whenever an awk-buffer has been initialised. ;; cc-modes in Xemacs whenever an awk-buffer has been initialised.
;; ;;
;; (Alan Mackenzie, 2003/4/30). ;; (Alan Mackenzie, 2003/4/30).
(defun c-fast-in-literal (&optional lim detect-cpp) (defun c-fast-in-literal (&optional lim detect-cpp)
...@@ -3406,7 +3406,7 @@ comment at the start of cc-engine.el for more info." ...@@ -3406,7 +3406,7 @@ comment at the start of cc-engine.el for more info."
(if (and (consp range) (progn (if (and (consp range) (progn
(goto-char (car range)) (goto-char (car range))
(looking-at c-line-comment-starter))) (looking-at c-line-comment-starter)))
(let ((col (current-column)) (let ((col (current-column))
(beg (point)) (beg (point))
(bopl (c-point 'bopl)) (bopl (c-point 'bopl))
(end (cdr range))) (end (cdr range)))
...@@ -4045,7 +4045,7 @@ comment at the start of cc-engine.el for more info." ...@@ -4045,7 +4045,7 @@ comment at the start of cc-engine.el for more info."
;; example, this happens to "foo" when "foo \n bar();" becomes ;; example, this happens to "foo" when "foo \n bar();" becomes
;; "foo(); \n bar();". Such stale types, if not removed, foul up ;; "foo(); \n bar();". Such stale types, if not removed, foul up
;; the fontification. ;; the fontification.
;; ;;
;; Have we, perhaps, added non-ws characters to the front/back of a found ;; Have we, perhaps, added non-ws characters to the front/back of a found
;; type? ;; type?
(when (> end beg) (when (> end beg)
...@@ -4064,7 +4064,7 @@ comment at the start of cc-engine.el for more info." ...@@ -4064,7 +4064,7 @@ comment at the start of cc-engine.el for more info."
(c-beginning-of-current-token))) (c-beginning-of-current-token)))
(c-unfind-type (buffer-substring-no-properties (c-unfind-type (buffer-substring-no-properties
(point) beg)))))) (point) beg))))))
(if c-maybe-stale-found-type ; e.g. (c-decl-id-start "foo" 97 107 " (* ooka) " "o") (if c-maybe-stale-found-type ; e.g. (c-decl-id-start "foo" 97 107 " (* ooka) " "o")
(cond (cond
;; Changing the amount of (already existing) whitespace - don't do anything. ;; Changing the amount of (already existing) whitespace - don't do anything.
...@@ -5929,7 +5929,7 @@ comment at the start of cc-engine.el for more info." ...@@ -5929,7 +5929,7 @@ comment at the start of cc-engine.el for more info."
macro-start ; if we're in one. macro-start ; if we're in one.
label-type) label-type)
(cond (cond
;; "case" or "default" (Doesn't apply to AWK). ;; "case" or "default" (Doesn't apply to AWK).
((looking-at c-label-kwds-regexp) ((looking-at c-label-kwds-regexp)
(let ((kwd-end (match-end 1))) (let ((kwd-end (match-end 1)))
;; Record only the keyword itself for fontification, since in ;; Record only the keyword itself for fontification, since in
...@@ -6048,7 +6048,7 @@ comment at the start of cc-engine.el for more info." ...@@ -6048,7 +6048,7 @@ comment at the start of cc-engine.el for more info."
(c-forward-label nil pte start)))))))))) (c-forward-label nil pte start))))))))))
;; Point is still at the beginning of the possible label construct. ;; Point is still at the beginning of the possible label construct.
;; ;;
;; Check that the next nonsymbol token is ":", or that we're in one ;; Check that the next nonsymbol token is ":", or that we're in one
;; of QT's "slots" declarations. Allow '(' for the sake of macro ;; of QT's "slots" declarations. Allow '(' for the sake of macro
;; arguments. FIXME: Should build this regexp from the language ;; arguments. FIXME: Should build this regexp from the language
...@@ -6074,7 +6074,7 @@ comment at the start of cc-engine.el for more info." ...@@ -6074,7 +6074,7 @@ comment at the start of cc-engine.el for more info."
(and (c-major-mode-is 'c++-mode) (and (c-major-mode-is 'c++-mode)
(string-match (string-match
"\\(p\\(r\\(ivate\\|otected\\)\\|ublic\\)\\|more\\)\\>" "\\(p\\(r\\(ivate\\|otected\\)\\|ublic\\)\\|more\\)\\>"
(buffer-substring start (point))))) (buffer-substring start (point)))))
(c-forward-syntactic-ws limit) (c-forward-syntactic-ws limit)
(cond (cond
((looking-at ":\\([^:]\\|\\'\\)") ; A single colon. ((looking-at ":\\([^:]\\|\\'\\)") ; A single colon.
...@@ -7238,7 +7238,7 @@ comment at the start of cc-engine.el for more info." ...@@ -7238,7 +7238,7 @@ comment at the start of cc-engine.el for more info."
;; needed with further syntax elements of the types `substatement', ;; needed with further syntax elements of the types `substatement',
;; `inexpr-statement', `arglist-cont-nonempty', `statement-block-intro', and ;; `inexpr-statement', `arglist-cont-nonempty', `statement-block-intro', and
;; `defun-block-intro'. ;; `defun-block-intro'.
;; ;;
;; Do the generic processing to anchor the given syntax symbol on ;; Do the generic processing to anchor the given syntax symbol on
;; the preceding statement: Skip over any labels and containing ;; the preceding statement: Skip over any labels and containing
;; statements on the same line, and then search backward until we ;; statements on the same line, and then search backward until we
...@@ -7424,7 +7424,7 @@ comment at the start of cc-engine.el for more info." ...@@ -7424,7 +7424,7 @@ comment at the start of cc-engine.el for more info."
c-other-decl-block-key-in-symbols-alist)) c-other-decl-block-key-in-symbols-alist))
(max (c-point 'boi paren-pos) (point)))) (max (c-point 'boi paren-pos) (point))))
(t (c-add-syntax 'defun-block-intro nil)))) (t (c-add-syntax 'defun-block-intro nil))))
(c-add-syntax 'statement-block-intro nil))) (c-add-syntax 'statement-block-intro nil)))
(if (= paren-pos boi) (if (= paren-pos boi)
...@@ -8264,7 +8264,7 @@ comment at the start of cc-engine.el for more info." ...@@ -8264,7 +8264,7 @@ comment at the start of cc-engine.el for more info."
'statement-cont) 'statement-cont)
nil nil containing-sexp paren-state)) nil nil containing-sexp paren-state))
)) ))
;; CASE 5F: Close of a non-class declaration level block. ;; CASE 5F: Close of a non-class declaration level block.
((and (eq char-after-ip ?}) ((and (eq char-after-ip ?})
(c-keyword-member containing-decl-kwd (c-keyword-member containing-decl-kwd
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment