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:
parent
3923998240
commit
093c2e1ab9
@ -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
|
||||
|
@ -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)
|
||||
|
||||
;; Don’t 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)
|
||||
|
Loading…
Reference in New Issue
Block a user