diff options
| author | Andrea Corallo <akrl@sdf.org> | 2021-02-25 20:25:05 +0100 |
|---|---|---|
| committer | Andrea Corallo <akrl@sdf.org> | 2021-02-25 20:26:27 +0100 |
| commit | 9ae48ae714b03e102957a1e9f9d6430f82c7adaa (patch) | |
| tree | f71919a92a36430894af29443383b8b4f5a8e613 /lisp/emacs-lisp | |
| parent | 0ee1a16769bfc8d3e6205e8d8dabc3be34df48b4 (diff) | |
| download | emacs-9ae48ae714b03e102957a1e9f9d6430f82c7adaa.tar.gz emacs-9ae48ae714b03e102957a1e9f9d6430f82c7adaa.tar.bz2 emacs-9ae48ae714b03e102957a1e9f9d6430f82c7adaa.zip | |
* Fix two docstrings in comp.el
* lisp/emacs-lisp/comp.el (comp-new-frame,
comp-maybe-add-vmvar): Fix docstring.
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 9ed92d720cf..40c1dfd831b 100644 --- a/lisp/emacs-lisp/comp.el +++ b/lisp/emacs-lisp/comp.el @@ -1470,7 +1470,7 @@ STACK-OFF is the index of the first slot frame involved." mvar)) (defun comp-new-frame (size vsize &optional ssa) - "Return a clean frame of meta variables of size SIZE. + "Return a clean frame of meta variables of size SIZE and VSIZE. If SSA non-nil populate it of m-var in ssa form." (cl-loop with v = (make-comp-vec :beg (- vsize) :end size) for i from (- vsize) below size @@ -2324,7 +2324,7 @@ The assume is emitted at the beginning of the block BB." (setf (comp-func-ssa-status comp-func) 'dirty))) (defun comp-maybe-add-vmvar (op cmp-res insns-seq) - "If CMP-RES is clobbering OP emit a new constrained MVAR and return it. + "If CMP-RES is clobbering OP emit a new constrained mvar and return it. Return OP otherwise." (if-let ((match (eql (comp-mvar-slot op) (comp-mvar-slot cmp-res))) (new-mvar (make-comp-mvar |