* lisp/emacs-lisp/byte-opt.el (byte-compile-trueconstp): Extend

Add skip-chars-forward, skip-chars-backward, skip-syntax-forward,
skip-syntax-backward, current-column, current-indentation,
char-syntax, syntax-class-to-char, parse-partial-sexp, goto-char,
forward-line, next-window, previous-window, minibuffer-window,
selected-frame, selected-window, standard-case-table,
standard-syntax-table, syntax-table, frame-first-window,
frame-root-window and frame-selected-window as always-true functions.
This commit is contained in:
Mattias Engdegård 2023-07-27 09:55:43 +02:00
parent 93eccb5e04
commit 4336d7e44a

View file

@ -786,6 +786,17 @@ for speeding up processing.")
make-marker copy-marker point-marker mark-marker
set-marker
kbd key-description
skip-chars-forward skip-chars-backward
skip-syntax-forward skip-syntax-backward
current-column current-indentation
char-syntax syntax-class-to-char
parse-partial-sexp goto-char forward-line
next-window previous-window minibuffer-window
selected-frame selected-window
standard-case-table standard-syntax-table
syntax-table
frame-first-window frame-root-window
frame-selected-window
always))
t)
((eq head 'if)