sforman
/
Thun
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

clear

This commit is contained in:
Simon Forman 2023-02-04 19:21:13 -08:00
parent c3e786aed9
commit 720f36a4c0
1 changed files with 7 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
implementations/C/joy.c
View File

@ -573,7 +573,13 @@ branch(JoyListPtr stack, JoyListPtr expression)
} }
void clear(JoyListPtr stack, JoyListPtr expression) {stack = expression;} void
clear(JoyListPtr stack, __attribute__((unused)) JoyListPtr expression)
{
*stack = EMPTY_LIST;
}
void div_joyfunc(JoyListPtr stack, JoyListPtr expression) {stack = expression;} void div_joyfunc(JoyListPtr stack, JoyListPtr expression) {stack = expression;}
void mod(JoyListPtr stack, JoyListPtr expression) {stack = expression;} void mod(JoyListPtr stack, JoyListPtr expression) {stack = expression;}
void truthy(JoyListPtr stack, JoyListPtr expression) {stack = expression;} void truthy(JoyListPtr stack, JoyListPtr expression) {stack = expression;}