reorder scope_dec
This commit is contained in:
parent
c27c244ccc
commit
eca92b6a5d
32
src/vm.h
32
src/vm.h
@ -242,24 +242,24 @@ DEF_FREE(scope) {
|
|||||||
}
|
}
|
||||||
FORCE_INLINE void scope_dec(Scope* sc) { // version of ptr_dec for scopes, that tries to also free trivial cycles. force-inlined!!
|
FORCE_INLINE void scope_dec(Scope* sc) { // version of ptr_dec for scopes, that tries to also free trivial cycles. force-inlined!!
|
||||||
i32 varAm = sc->varAm;
|
i32 varAm = sc->varAm;
|
||||||
if (sc->refc>1) {
|
if (LIKELY(sc->refc==1)) goto free;
|
||||||
i32 innerRef = 1;
|
i32 innerRef = 1;
|
||||||
for (i32 i = 0; i < varAm; i++) {
|
for (i32 i = 0; i < varAm; i++) {
|
||||||
B c = sc->vars[i];
|
B c = sc->vars[i];
|
||||||
if (isVal(c) && v(c)->refc==1) {
|
if (isVal(c) && v(c)->refc==1) {
|
||||||
u8 t = v(c)->type;
|
u8 t = v(c)->type;
|
||||||
if (t==t_funBl && c(FunBlock,c)->sc==sc) innerRef++;
|
if (t==t_funBl && c(FunBlock,c)->sc==sc) innerRef++;
|
||||||
else if (t==t_md1Bl && c(Md1Block,c)->sc==sc) innerRef++;
|
else if (t==t_md1Bl && c(Md1Block,c)->sc==sc) innerRef++;
|
||||||
else if (t==t_md2Bl && c(Md2Block,c)->sc==sc) innerRef++;
|
else if (t==t_md2Bl && c(Md2Block,c)->sc==sc) innerRef++;
|
||||||
}
|
|
||||||
}
|
|
||||||
assert(innerRef <= sc->refc);
|
|
||||||
if (innerRef==sc->refc) {
|
|
||||||
value_free((Value*)sc);
|
|
||||||
return;
|
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
tptr_dec(sc, scope_freeF);
|
assert(innerRef <= sc->refc);
|
||||||
|
if (innerRef==sc->refc) goto free;
|
||||||
|
sc->refc--; // refc>0 guaranteed by previous refc!=1 result
|
||||||
|
return;
|
||||||
|
|
||||||
|
free:
|
||||||
|
scope_freeF((Value*) sc);
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user