mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 02:20:21 -08:00
Code Issues Projects Releases Wiki Activity

* lisp/emacs-lisp/pcase.el (pcase--subtype-bitsets): Fix bootstrap failure

Browse source 
`rm lisp/emacs-lisp/cl-preloaded.elc src/bootstrap-emacs`
followed by `make` ended up loading right after defining
`built-in-class-p` but before actually defining the
built-in-classes so the computation of bitsets failed.
This commit is contained in:
Stefan Monnier 2024-05-22 13:27:50 -04:00
parent 70effed88d
commit d8af7c99bb
1 changed files with 2 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

3
lisp/emacs-lisp/pcase.el
View file

@ -678,7 +678,8 @@ recording whether the var has been referenced by earlier parts of the match."
bitsets)))
(defconst pcase--subtype-bitsets
(if (fboundp 'built-in-class-p)
(if (and (fboundp 'built-in-class-p)
(built-in-class-p (get 'function 'cl--class)))
(pcase--subtype-bitsets)
;; Early bootstrap: we don't have the built-in classes yet, so just
;; use an empty table for now.