diff options
| author | Andrea Corallo <akrl@sdf.org> | 2021-01-01 12:00:04 +0100 |
|---|---|---|
| committer | Andrea Corallo <akrl@sdf.org> | 2021-01-01 14:07:27 +0100 |
| commit | c29037c877ae0d606daf3949dfc3e4e43883d74f (patch) | |
| tree | 6258a791e218c3958ad7702bf24f73cfcd318955 | |
| parent | 93ff838575d25eba76bb0b3d476a36a56bbfba30 (diff) | |
| download | emacs-c29037c877ae0d606daf3949dfc3e4e43883d74f.tar.gz | |
* lisp/emacs-lisp/comp.el (comp-compute-dominator-tree): Fix.
| -rw-r--r-- | lisp/emacs-lisp/comp.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/comp.el b/lisp/emacs-lisp/comp.el index 227333f72c8..848bcf70cdb 100644 --- a/lisp/emacs-lisp/comp.el +++ b/lisp/emacs-lisp/comp.el @@ -2650,7 +2650,7 @@ blocks." (when-let ((blocks (comp-func-blocks comp-func)) (entry (gethash 'entry blocks)) ;; No point to go on if the only bb is 'entry'. - (bb1 (gethash 'bb_1 blocks))) + (bb0 (gethash 'bb_0 blocks))) (cl-loop with rev-bb-list = (comp-collect-rev-post-order entry) with changed = t while changed |