mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-06 20:20:20 +02:00
Code Activity

Add assertion to detect double patching.

Browse source 
This triggers the bug at the right point, otherwise, double patching
may be quite hard to track.
This commit is contained in:
pcpa 2013-10-16 01:13:46 -03:00
parent fe3aee2706
commit a264ccee75
1 changed files with 1 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

1
lib/lightning.c
View file

@ -1367,6 +1367,7 @@ _jit_patch_at(jit_state_t *_jit, jit_node_t *instr, jit_node_t *label)
{ {
jit_int32_t mask; jit_int32_t mask;
assert(!(instr->flag & jit_flag_node));
instr->flag |= jit_flag_node; instr->flag |= jit_flag_node;
switch (instr->code) { switch (instr->code) {
case jit_code_movi: case jit_code_movi: