From dd1220b96972d77e5bbe1094586514bae63fe1eb Mon Sep 17 00:00:00 2001 From: Stefan Kangas Date: Sat, 18 Sep 2021 13:12:41 +0200 Subject: ; More stylistic docfixes in emacs-lisp/*.el found by checkdoc --- lisp/emacs-lisp/byte-opt.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'lisp/emacs-lisp/byte-opt.el') diff --git a/lisp/emacs-lisp/byte-opt.el b/lisp/emacs-lisp/byte-opt.el index 966ef266b9a..c15814afa00 100644 --- a/lisp/emacs-lisp/byte-opt.el +++ b/lisp/emacs-lisp/byte-opt.el @@ -202,7 +202,7 @@ (intern (substring (symbol-name arg) 5)) arg) (if (integerp (setq c (car arg))) - (error "non-symbolic byte-op %s" c)) + (error "Non-symbolic byte-op %s" c)) (if (eq c 'TAG) (setq c arg) (setq a (cond ((memq c byte-goto-ops) @@ -1753,7 +1753,7 @@ See Info node `(elisp) Integer Basics'." (setq tags (delq tmp tags)) (setq rest (cdr rest)))) (setq rest (cdr rest)))) - (if tags (error "optimizer error: missed tags %s" tags)) + (if tags (error "Optimizer error: missed tags %s" tags)) ;; Remove addrs, lap = ( [ (op . arg) | (TAG tagno) ]* ) (mapcar (lambda (elt) (if (numberp elt) -- cgit v1.2.3