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:55:08 -05:00
parent bf8eb83575
commit 77434a4c01
4 changed files with 13 additions and 8 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
lib/stack.c
View File

@@ -77,13 +77,13 @@ static size_t stack_len(Stack* s)
static TYC_RESULT stack_at(Stack* s, int32_t key, VALUE* v)
{
if (key >= 0) {
if (stack_top_fp(s) + key >= s->stack_n)
if ((int) stack_top_fp(s) + key >= (int) s->stack_n)
return T_ERR_STACK_ACCESS_OUT_OF_RANGE;
*v = s->stack[stack_top_fp(s) + key];
*v = s->stack[(int) stack_top_fp(s) + key];
} else {
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];
*v = s->stack[(int) s->stack_n + key];
}
return T_OK;
@@ -92,13 +92,13 @@ static TYC_RESULT stack_at(Stack* s, int32_t key, VALUE* v)
static TYC_RESULT stack_set(Stack* s, int32_t key, VALUE v)
{
if (key >= 0) {
if (stack_top_fp(s) + key >= s->stack_n)
if ((int) stack_top_fp(s) + key >= (int) s->stack_n)
return T_ERR_STACK_ACCESS_OUT_OF_RANGE;
s->stack[stack_top_fp(s) + key] = v;
s->stack[(int) stack_top_fp(s) + key] = v;
} else {
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;
s->stack[(int) s->stack_n + key] = v;
}
return T_OK;