* Two minors in comp.el

	* lisp/emacs-lisp/comp.el (comp-known-func-cstr-h)
	(comp-ret-type-spec): Style.

diff --git a/lisp/emacs-lisp/comp.el b/lisp/emacs-lisp/comp.el
index a75ca312d2e58dc2d40c2ef9df59d4fb13c143af..750c298a02c643f8530ec7f9a7a1bbe2953ba04a 100644 (file)
--- a/lisp/emacs-lisp/comp.el
+++ b/lisp/emacs-lisp/comp.el
@@ -275,7 +275,7 @@ Useful to hook into pass checkers.")
    for (f type-spec) in comp-known-type-specifiers
    for cstr = (comp-type-spec-to-cstr type-spec)
    do (puthash f cstr h)
-   finally (cl-return h))
+   finally return h)
   "Hash table function -> `comp-constraint'")
 
 (defconst comp-symbol-values-optimizable '(most-positive-fixnum
@@ -2761,7 +2761,7 @@ Set it into the `ret-type-specifier' slot."
                                do (pcase insn
                                     (`(return ,mvar)
                                      (push mvar res))))
-                           finally (cl-return res)))))
+                           finally return res))))
     (setf (comp-func-ret-type-specifier func)
           (comp-cstr-to-type-spec res-mvar))))