diff options
| author | Andrea Corallo <akrl@sdf.org> | 2021-02-27 21:26:41 +0100 |
|---|---|---|
| committer | Andrea Corallo <akrl@sdf.org> | 2021-02-28 23:29:49 +0100 |
| commit | 2acc46b55bdf518ece6301913ffa074f31563fa4 (patch) | |
| tree | 996a9b209c9fac76fe22a8b48d693af23934b88b /src/comp.c | |
| parent | 312deba5302a8136fa104b054af54572cc64ea5e (diff) | |
| download | emacs-2acc46b55bdf518ece6301913ffa074f31563fa4.tar.gz emacs-2acc46b55bdf518ece6301913ffa074f31563fa4.tar.bz2 emacs-2acc46b55bdf518ece6301913ffa074f31563fa4.zip | |
Migrate and rename a bunch of functions from comp.el to comp-cstr.el
* lisp/emacs-lisp/comp-cstr.el (comp-cstr-imm-vld-p)
(comp-cstr-imm, comp-cstr-fixnum-p, comp-cstr-symbol-p)
(comp-cstr-cons-p): Move and rename from 'comp.el'.
* lisp/emacs-lisp/comp.el (comp-mvar-type-hint-match-p)
(make-comp-mvar, comp-emit-assume, comp-fwprop-prologue)
(comp-function-foldable-p, comp-function-call-maybe-fold)
(comp-fwprop-call, comp-fwprop-insn, comp-call-optim-func)
(comp-compute-function-type): Update for renamed functions.
* src/comp.c (emit_mvar_rval): Likewise.
* test/src/comp-tests.el (comp-tests-mentioned-p-1)
(comp-tests-cond-rw-checker-val): Likewise.
Diffstat (limited to 'src/comp.c')
| -rw-r--r-- | src/comp.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/comp.c b/src/comp.c index 1a89e4e62a4..21d1c1a23cf 100644 --- a/src/comp.c +++ b/src/comp.c @@ -1747,11 +1747,11 @@ emit_PURE_P (gcc_jit_rvalue *ptr) static gcc_jit_rvalue * emit_mvar_rval (Lisp_Object mvar) { - Lisp_Object const_vld = CALL1I (comp-mvar-value-vld-p, mvar); + Lisp_Object const_vld = CALL1I (comp-cstr-imm-vld-p, mvar); if (!NILP (const_vld)) { - Lisp_Object value = CALL1I (comp-mvar-value, mvar); + Lisp_Object value = CALL1I (comp-cstr-imm, mvar); if (comp.debug > 1) { Lisp_Object func = |