mirror of
https://git.savannah.gnu.org/git/guile.git
synced 2025-05-19 03:00:25 +02:00
ARM: Better check for constants offset overflow
* lib/jit_arm.c: Better check for need to flush constants before the pool being no longer reachable.
This commit is contained in:
parent
88aa2fcad2
commit
5eb3c3602f
2 changed files with 8 additions and 2 deletions
|
@ -1,3 +1,8 @@
|
||||||
|
2014-12-26 Paulo Andrade <pcpa@gnu.org>
|
||||||
|
|
||||||
|
* lib/jit_arm.c: Better check for need to flush constants
|
||||||
|
before the pool being no longer reachable.
|
||||||
|
|
||||||
2014-12-25 Paulo Andrade <pcpa@gnu.org>
|
2014-12-25 Paulo Andrade <pcpa@gnu.org>
|
||||||
|
|
||||||
* include/lightning.h: Split jit_htonr in the new 3 interfaces
|
* include/lightning.h: Split jit_htonr in the new 3 interfaces
|
||||||
|
|
|
@ -1532,8 +1532,9 @@ _emit_code(jit_state_t *_jit)
|
||||||
jit_reglive(node);
|
jit_reglive(node);
|
||||||
|
|
||||||
if (_jitc->consts.length &&
|
if (_jitc->consts.length &&
|
||||||
(jit_uword_t)_jit->pc.uc -
|
(_jit->pc.uc - _jitc->consts.data >= 3968 ||
|
||||||
(jit_uword_t)_jitc->consts.patches[0] >= 3968) {
|
(jit_uword_t)_jit->pc.uc -
|
||||||
|
(jit_uword_t)_jitc->consts.patches[0] >= 3968)) {
|
||||||
/* longest sequence should be 64 bytes, but preventively
|
/* longest sequence should be 64 bytes, but preventively
|
||||||
* do not let it go past 128 remaining bytes before a flush */
|
* do not let it go past 128 remaining bytes before a flush */
|
||||||
if (node->next &&
|
if (node->next &&
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue