From: Andrea Corallo <akrl@sdf.org>
Date: Thu, 24 Oct 2019 13:03:03 +0000 (+0200)
Subject: fix comp-limplify-block for wrong cl func usage
X-Git-Tag: emacs-28.0.90~2727^2~1061
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=59f7b155119b5718b83f0bac7409dd597002c89b;p=emacs.git

fix comp-limplify-block for wrong cl func usage
---

diff --git a/lisp/emacs-lisp/comp.el b/lisp/emacs-lisp/comp.el
index d9b0c184625..cf779179d70 100644
--- a/lisp/emacs-lisp/comp.el
+++ b/lisp/emacs-lisp/comp.el
@@ -1092,7 +1092,7 @@ The block name is returned."
            (when (and fall-through
                       (not (comp-block-closed bb)))
              (comp-emit `(jump ,next-bb))))
-         (return)))
+         (cl-return)))
    until (comp-lap-eob-p inst)))
 
 (defun comp-limplify-function (func)