emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

feature/native-comp d072ee9 07/19: * Two minors in comp.el


From: Andrea Corallo
Subject: feature/native-comp d072ee9 07/19: * Two minors in comp.el
Date: Mon, 21 Dec 2020 14:52:39 -0500 (EST)

branch: feature/native-comp
commit d072ee9d3471772dffc42cd3e33b677c1cfb8965
Author: Andrea Corallo <akrl@sdf.org>
Commit: Andrea Corallo <akrl@sdf.org>

    * Two minors in comp.el
    
        * lisp/emacs-lisp/comp.el (comp-known-func-cstr-h)
        (comp-ret-type-spec): Style.
---
 lisp/emacs-lisp/comp.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lisp/emacs-lisp/comp.el b/lisp/emacs-lisp/comp.el
index a75ca31..750c298 100644
--- 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))))
 



reply via email to

[Prev in Thread] Current Thread [Next in Thread]