[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
bug#62959: [PATCH] Recognize defstruct slot names in various eieio funct
From: |
Stefan Monnier |
Subject: |
bug#62959: [PATCH] Recognize defstruct slot names in various eieio functions |
Date: |
Tue, 02 May 2023 16:48:02 -0400 |
User-agent: |
Gnus/5.13 (Gnus v5.13) |
>> diff --git a/lisp/emacs-lisp/cl-preloaded.el
>> b/lisp/emacs-lisp/cl-preloaded.el
>> index 9445093f143..5235be52996 100644
>> --- a/lisp/emacs-lisp/cl-preloaded.el
>> +++ b/lisp/emacs-lisp/cl-preloaded.el
>> @@ -176,6 +176,7 @@ cl-struct-define
>> (i 0)
>> (offset (if type 0 1)))
>> (dolist (slot slots)
>> + (put (car slot) 'slot-name t)
>> (let* ((props (cl--plist-to-alist (cddr slot)))
>> (typep (assq :type props))
>> (type (if (null typep) t
>> --
>> 2.39.2
>>
>
> Stefan, any comments?
LGTM, thanks,
Stefan
- bug#62959: [PATCH] Recognize defstruct slot names in various eieio functions,
Stefan Monnier <=