mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-01 08:17:38 +00:00
Code Issues Releases Activity

(wisent-python-lex-beginning-of-line): Fix compiler warning

Browse Source 
* lisp/cedet/semantic/wisent/python.el
(wisent-python-lex-beginning-of-line): Comment out unused test.
This commit is contained in:
Stefan Monnier 2023-11-13 13:24:12 -05:00
parent 183d2c3e54
commit 1124a9853f
1 changed files with 13 additions and 12 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

25
lisp/cedet/semantic/wisent/python.el
View File

@ -262,18 +262,19 @@ the indentation of the current line."
;; Loop lexer to handle tokens in current line.
t)
;; Indentation decreased
((progn
;; Pop items from indentation stack
(while (< curr-indent last-indent)
(pop wisent-python-indent-stack)
(setq semantic-lex-current-depth (1- semantic-lex-current-depth)
last-indent (car wisent-python-indent-stack))
(semantic-lex-push-token
(semantic-lex-token 'DEDENT last-pos (point))))
(= last-pos (point)))
;; If pos did not change, then we must return nil so that
;; other lexical analyzers can be run.
nil))))
(t
;; Pop items from indentation stack
(while (< curr-indent last-indent)
(pop wisent-python-indent-stack)
(setq semantic-lex-current-depth (1- semantic-lex-current-depth)
last-indent (car wisent-python-indent-stack))
(semantic-lex-push-token
(semantic-lex-token 'DEDENT last-pos (point))))
;; (if (= last-pos (point))
;; ;; If pos did not change, then we must return nil so that
;; ;; other lexical analyzers can be run.
;; nil)
))))
;; All the work was done in the above analyzer matching condition.
)