平衡点
2025/03/06
_ Emacs30 で lookup-el が動かなくなった.
make-verctor
→ obarray-make
という奴ですね.
Old code which (incorrectly) created "obarrays" as Lisp vectors filled with something other than 0, as in '(make-vector N nil)', will no longer work, and should be rewritten to use 'obarray-make'. Alternatively, you can fill the vector with 0.
とりあえず
--- a/lisp/lookup.el
+++ b/lisp/lookup.el
@@ -601,7 +601,7 @@ ID B$O<-=qIDB!#TAG B$O%*%W%7%g%s$N%?%0!#VALUE B$O%;%C%H$9$kCM!#
;:: Internal functions
;;;
-(defconst lookup-obarray (make-vector 1511 nil))
+(defconst lookup-obarray (if (fboundp 'obarray-make) (obarray-make 1511) (make-vector 1511 nil)))
(defsubst lookup-intern-string (string)
(symbol-name (intern string lookup-obarray)))
としたら動くようにはなったけど, これでエエのかしらね…
でもって, 現在の lookup-el の upstream はどこなの?
[ツッコミを入れる]