andre/tyche
1
0
Fork 0
Code Pull Requests Actions Packages Releases Activity

.

Browse Source
This commit is contained in:
Andre Wagner
2026-05-12 10:47:14 -05:00
parent 501f99f28f
commit 455b24153c
2 changed files with 3 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
lib/stack.c
View File

@@ -81,7 +81,7 @@ static TYC_RESULT stack_at(Stack* s, int32_t key, VALUE* v)
return T_ERR_STACK_ACCESS_OUT_OF_RANGE;
*v = s->stack[stack_top_fp(s) + key];
} else {
if ((int) stack_top_fp(s) + (int) s->stack_n + key < 0)
if ((int) s->stack_n + key < (int) stack_top_fp(s))
return T_ERR_STACK_ACCESS_OUT_OF_RANGE;
*v = s->stack[s->stack_n + key];
}
@@ -96,7 +96,7 @@ static TYC_RESULT stack_set(Stack* s, int32_t key, VALUE v)
return T_ERR_STACK_ACCESS_OUT_OF_RANGE;
s->stack[stack_top_fp(s) + key] = v;
} else {
if ((int) stack_top_fp(s) + (int) s->stack_n + key < 0)
if ((int) s->stack_n + key < (int) stack_top_fp(s))
return T_ERR_STACK_ACCESS_OUT_OF_RANGE;
s->stack[s->stack_n + key] = v;
}