etc/uxn
0
0
Fork 0
mirror of https://git.sr.ht/~rabbits/uxn synced 2024-11-28 16:53:02 +00:00
Code Issues Projects Releases Wiki Activity

Merge branch 'main' of git.sr.ht:~rabbits/uxn

Browse source
This commit is contained in:
Devine Lu Linvega 2024-09-17 18:10:02 -07:00
commit 0da4c3335d
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
src/uxnasm.c
View file

@ -41,7 +41,7 @@ static int find(char *s, char t) { int i = 0; char c; while((c = *s++)) { if(c
static int shex(char *s) { int d, n = 0; char c; while((c = *s++)) { d = find(hexad, c); if(d < 0) return d; n = n << 4, n |= d; } return n; }
static int scmp(char *a, char *b, int len) { int i = 0; while(a[i] == b[i]) if(!a[i] || ++i >= len) return 1; return 0; }
static char *copy(char *src, char *dst, char c) { while(*src && *src != c) *dst++ = *src++; *dst++ = 0; return dst; }
static char *save(char *s, char c) { char *o = dictnext; while((*dictnext++ = *s++) && *s); *dictnext++ = c; return o; }
static char *save(char *s, char c) { char *o = dictnext; while((*dictnext++ = *s++) && *s){}; *dictnext++ = c; return o; }
static char *join(char *a, char j, char *b) { char *res = dictnext; save(a, j), save(b, 0); return res; }
#define ishex(x) (shex(x) >= 0)