diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2022-01-25 14:36:48 -0500 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2022-01-25 14:36:48 -0500 |
| commit | f4ed3f39c979f101e523ff1073ffe364d5c44501 (patch) | |
| tree | f6f5f95b9b83b59d6e185ab2f6febe40aa3c4a89 /src/comp.c | |
| parent | 84276bf775d42388ebc69683d093adef7fc0ed74 (diff) | |
| download | emacs-f4ed3f39c979f101e523ff1073ffe364d5c44501.tar.gz emacs-f4ed3f39c979f101e523ff1073ffe364d5c44501.tar.bz2 emacs-f4ed3f39c979f101e523ff1073ffe364d5c44501.zip | |
* src/comp.c (emit_limple_insn): Fix another int/Lisp_Object mixup
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 9abc5d96906..d8fe80df3a6 100644 --- a/src/comp.c +++ b/src/comp.c @@ -2237,9 +2237,9 @@ emit_limple_insn (Lisp_Object insn) gcc_jit_block *target1 = retrive_block (arg[2]); gcc_jit_block *target2 = retrive_block (arg[3]); - if ((CALL1I (comp-cstr-imm-vld-p, arg[0]) + if ((!NILP (CALL1I (comp-cstr-imm-vld-p, arg[0])) && NILP (CALL1I (comp-cstr-imm, arg[0]))) - || (CALL1I (comp-cstr-imm-vld-p, arg[1]) + || (!NILP (CALL1I (comp-cstr-imm-vld-p, arg[1])) && NILP (CALL1I (comp-cstr-imm, arg[1])))) emit_cond_jump (emit_BASE_EQ (a, b), target1, target2); else |