diff options
| -rw-r--r-- | lisp/emacs-lisp/cl-macs.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/cl-macs.el b/lisp/emacs-lisp/cl-macs.el index c4f69120ff7..9edd85e36bf 100644 --- a/lisp/emacs-lisp/cl-macs.el +++ b/lisp/emacs-lisp/cl-macs.el | |||
| @@ -3110,7 +3110,7 @@ slots skipped by :initial-offset may appear in the list." | |||
| 3110 | descs))) | 3110 | descs))) |
| 3111 | (nreverse descs))) | 3111 | (nreverse descs))) |
| 3112 | 3112 | ||
| 3113 | (define-error 'cl-struct-unknown-slot "struct %S has no slot %S") | 3113 | (define-error 'cl-struct-unknown-slot "struct has no slot") |
| 3114 | 3114 | ||
| 3115 | (defun cl-struct-slot-offset (struct-type slot-name) | 3115 | (defun cl-struct-slot-offset (struct-type slot-name) |
| 3116 | "Return the offset of slot SLOT-NAME in STRUCT-TYPE. | 3116 | "Return the offset of slot SLOT-NAME in STRUCT-TYPE. |