平衡点


2025/03/06

_ Emacs30 で lookup-el が動かなくなった.

make-verctorobarray-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 はどこなの?


連絡先など
"
最近の日記
一覧
Back to Top ▲