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

3
.idea/runConfigurations/tyche_test.xml generated
View File

@@ -1,10 +1,9 @@
<component name="ProjectRunConfigurationManager"> <component name="ProjectRunConfigurationManager">
<configuration default="false" name="tyche-test" type="CLionNativeAppRunConfigurationType" REDIRECT_INPUT="false" ELEVATE="false" USE_EXTERNAL_CONSOLE="false" EMULATE_TERMINAL="false" PASS_PARENT_ENVS_2="true" PROJECT_NAME="tyche" TARGET_NAME="tyche-test" CONFIG_NAME="tyche-test" version="1" RUN_TARGET_PROJECT_NAME="tyche" RUN_TARGET_NAME="tyche-test"> <configuration default="false" name="tyche-test" type="CLionNativeAppRunConfigurationType" REDIRECT_INPUT="false" ELEVATE="false" USE_EXTERNAL_CONSOLE="false" EMULATE_TERMINAL="false" PASS_PARENT_ENVS_2="true" PROJECT_NAME="tyche" TARGET_NAME="tyche-test" CONFIG_NAME="tyche-test" version="1" RUN_PATH="$PROJECT_DIR$/tyche-test">
<envs> <envs>
<env name="MallocNanoZone" value="0" /> <env name="MallocNanoZone" value="0" />
</envs> </envs>
<method v="2"> <method v="2">
<option name="ToolBeforeRunTask" enabled="true" actionId="Tool_External Tools_clean" />
<option name="CLION.COMPOUND.BUILD" enabled="true" /> <option name="CLION.COMPOUND.BUILD" enabled="true" />
</method> </method>
</configuration> </configuration>

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; return T_ERR_STACK_ACCESS_OUT_OF_RANGE;
*v = s->stack[stack_top_fp(s) + key]; *v = s->stack[stack_top_fp(s) + key];
} else { } 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; return T_ERR_STACK_ACCESS_OUT_OF_RANGE;
*v = s->stack[s->stack_n + key]; *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; return T_ERR_STACK_ACCESS_OUT_OF_RANGE;
s->stack[stack_top_fp(s) + key] = v; s->stack[stack_top_fp(s) + key] = v;
} else { } 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; return T_ERR_STACK_ACCESS_OUT_OF_RANGE;
s->stack[s->stack_n + key] = v; s->stack[s->stack_n + key] = v;
} }