1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-21 06:55:39 +00:00

; Fix some wording in recent obarray changes.

This commit is contained in:
Basil L. Contovounesios 2024-02-29 16:21:05 +01:00
parent 3923998240
commit 093c2e1ab9
2 changed files with 6 additions and 5 deletions

View File

@ -231,7 +231,7 @@ Emacs Lisp provides a different namespacing system called
This function creates and returns a new obarray.
The optional @var{size} may be used to specify the number of symbols
that it is expected to hold, but since obarrays grow automatically
as needed, this rarely provide any benefit.
as needed, this rarely provides any benefit.
@end defun
@defun obarrayp object

View File

@ -29,10 +29,11 @@
(defconst obarray-default-size 4)
(make-obsolete-variable 'obarray-default-size
"obarrays now grow automatically" "30.1")
"obarrays now grow automatically." "30.1")
(defun obarray-size (_ob) obarray-default-size)
(make-obsolete 'obarray-size "obarrays now grow automatically" "30.1")
(defun obarray-size (_ob)
(declare (obsolete "obarrays now grow automatically." "30.1"))
obarray-default-size)
;; Dont use obarray as a variable name to avoid shadowing.
(defun obarray-get (ob name)
@ -42,7 +43,7 @@ Return nil otherwise."
(defun obarray-put (ob name)
"Return symbol named NAME from obarray OB.
Creates and adds the symbol if doesn't exist."
Creates and adds the symbol if it doesn't exist."
(intern name ob))
(defun obarray-remove (ob name)