diff options
| author | Andrea Corallo <akrl@sdf.org> | 2020-12-16 18:37:39 +0100 |
|---|---|---|
| committer | Andrea Corallo <akrl@sdf.org> | 2020-12-21 20:22:02 +0100 |
| commit | d072ee9d3471772dffc42cd3e33b677c1cfb8965 (patch) | |
| tree | f7b566e8d5a510f7d761ba60799fdd72924d5cc8 /lisp/emacs-lisp | |
| parent | 7074988d13353c544f0a870a8ff3a8deb7b0b8f6 (diff) | |
| download | emacs-d072ee9d3471772dffc42cd3e33b677c1cfb8965.tar.gz emacs-d072ee9d3471772dffc42cd3e33b677c1cfb8965.tar.bz2 emacs-d072ee9d3471772dffc42cd3e33b677c1cfb8965.zip | |
* Two minors in comp.el
* lisp/emacs-lisp/comp.el (comp-known-func-cstr-h)
(comp-ret-type-spec): Style.
Diffstat (limited to 'lisp/emacs-lisp')
| -rw-r--r-- | lisp/emacs-lisp/comp.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/comp.el b/lisp/emacs-lisp/comp.el index a75ca312d2e..750c298a02c 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)))) |