etc
/
uxn
mirror of https://git.sr.ht/~rabbits/uxn
0
1
Fork 0
Code Issues Projects Releases Wiki Activity

Assembly stop on long token

This commit is contained in:
neauoire 2021-08-29 10:51:14 -07:00
parent ca5ad113ee
commit 0da8709ce3
1 changed files with 2 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
src/uxnasm.c
View File

@ -162,8 +162,6 @@ makemacro(char *name, FILE *f)
if(word[0] == '}') break;
if(m->len > 64)
return error("Macro too large", name);
if(slen(word) >= 63)
return error("Word too long", name);
scpy(word, m->items[m->len++], 64);
}
return 1;
@ -306,8 +304,8 @@ pass1(FILE *f)
char w[64], scope[64], subw[64];
while(fscanf(f, "%63s", w) == 1) {
if(skipblock(w, &ccmnt, '(', ')')) continue;
if(slen(w) == 63)
fprintf(stderr, "Warning: token beginning with \"%s\" is too long\n", w);
if(slen(w) >= 63)
return error("Pass 1 - Invalid token", w);
if(w[0] == '|') {
if(!sihx(w + 1))
return error("Pass 1 - Invalid padding", w);