d6
/
modal
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Housekeeping

This commit is contained in:
Devine Lu Linvega 2024-04-28 21:23:27 -07:00
parent 2f1df92c21
commit 3d9ecb0b7b
1 changed files with 13 additions and 13 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

26
src/modal.c
View File

@ -43,24 +43,24 @@ sint(char *s)
static void static void
device_write(char *s) device_write(char *s)
{ {
int acc = 0;
char c = *s, *cap = walk(s), **reg = regs + '0'; char c = *s, *cap = walk(s), **reg = regs + '0';
/* phase: ALU */ /* phase: ALU */
if(*reg) { if(*reg) {
int acc = sint(*reg++);
/* clang-format off */ /* clang-format off */
switch(c) { switch(c) {
case '+': for(acc = sint(*reg++); *reg != 0; reg++) acc += sint(*reg); break; case '+': for(;*reg != 0; reg++) acc += sint(*reg); break;
case '-': for(acc = sint(*reg++); *reg != 0; reg++) acc -= sint(*reg); break; case '-': for(;*reg != 0; reg++) acc -= sint(*reg); break;
case '*': for(acc = sint(*reg++); *reg != 0; reg++) acc *= sint(*reg); break; case '*': for(;*reg != 0; reg++) acc *= sint(*reg); break;
case '/': for(acc = sint(*reg++); *reg != 0; reg++) acc /= sint(*reg); break; case '/': for(;*reg != 0; reg++) acc /= sint(*reg); break;
case '%': for(acc = sint(*reg++); *reg != 0; reg++) acc %= sint(*reg); break; case '%': for(;*reg != 0; reg++) acc %= sint(*reg); break;
case '&': for(acc = sint(*reg++); *reg != 0; reg++) acc &= sint(*reg); break; case '&': for(;*reg != 0; reg++) acc &= sint(*reg); break;
case '^': for(acc = sint(*reg++); *reg != 0; reg++) acc ^= sint(*reg); break; case '^': for(;*reg != 0; reg++) acc ^= sint(*reg); break;
case '|': for(acc = sint(*reg++); *reg != 0; reg++) acc |= sint(*reg); break; case '|': for(;*reg != 0; reg++) acc |= sint(*reg); break;
case '=': for(acc = sint(*reg++); *reg != 0; reg++) acc = acc == sint(*reg); break; case '=': for(;*reg != 0; reg++) acc = acc == sint(*reg); break;
case '!': for(acc = sint(*reg++); *reg != 0; reg++) acc = acc != sint(*reg); break; case '!': for(;*reg != 0; reg++) acc = acc != sint(*reg); break;
case '>': for(acc = sint(*reg++); *reg != 0; reg++) acc = acc > sint(*reg); break; case '>': for(;*reg != 0; reg++) acc = acc > sint(*reg); break;
case '<': for(acc = sint(*reg++); *reg != 0; reg++) acc = acc < sint(*reg); break; case '<': for(;*reg != 0; reg++) acc = acc < sint(*reg); break;
} }
/* clang-format on */ /* clang-format on */
dst_ += snprintf(dst_, 0x10, "%d", acc); dst_ += snprintf(dst_, 0x10, "%d", acc);