aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/emacs-lisp/syntax.el10
1 files changed, 6 insertions, 4 deletions
diff --git a/lisp/emacs-lisp/syntax.el b/lisp/emacs-lisp/syntax.el
index f290db42c04..619fa18e91f 100644
--- a/lisp/emacs-lisp/syntax.el
+++ b/lisp/emacs-lisp/syntax.el
@@ -53,10 +53,12 @@
53 (nth 0 ppss)) 53 (nth 0 ppss))
54 54
55(defun syntax-ppss-toplevel-pos (ppss) 55(defun syntax-ppss-toplevel-pos (ppss)
56 "Return the last preceding position at toplevel. 56 "Get the latest syntactically outermost position found in a syntactic scan.
57\"At toplevel\" means that it is outside of any syntactic entity: 57PPSS is a scan state, as returned by `partial-parse-sexp' or `syntax-ppss'.
58outside of any parentheses, or comments, or strings. 58An \"outermost position\" means one that it is outside of any syntactic entity:
59Returns nil iff PPSS itself corresponds to a toplevel position." 59outside of any parentheses, comments, or strings encountered in the scan.
60If no such position is recorded in PPSS (because the end of the scan was
61itself at the outermost level), return nil."
60 (or (car (nth 9 ppss)) 62 (or (car (nth 9 ppss))
61 (nth 8 ppss))) 63 (nth 8 ppss)))
62 64