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

Removed redundant check in spacer

This commit is contained in:
Devine Lu Linvega 2024-04-08 10:50:43 -07:00
parent 6e60bebf3d
commit a0e795557f
2 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
examples/test.modal
View File

@ -13,4 +13,4 @@
<> (?x ?y swap) (?y ?x) <> (?x ?y swap) (?y ?x)
<> (?x pop) () <> (?x pop) ()
(implode reverse (explode hello)) (read) (explode hello) empty-register (eq abc abc) (eq abc def) (1 2 3) (4 5 6) swap pop dup (implode reverse (explode hello)) (read) (explode hello) empty-register (eq abc abc) (eq abc def) (1 2 3) (4 5 6) swap pop dup (hey 1234 pop)

2
src/modal.c
View File

@ -11,7 +11,7 @@ static char bank_a[0x4000], *prog_ = bank_a;
static char bank_b[0x4000], *outp_ = bank_b; static char bank_b[0x4000], *outp_ = bank_b;
static char *regs[0x100]; static char *regs[0x100];
#define spacer(c) (c < 0x21 || c == '(' || c == ')' || !c) #define spacer(c) (c < 0x21 || c == '(' || c == ')')
static char * static char *
walk(char *s) walk(char *s)