mirror of https://git.sr.ht/~rabbits/uxn
(uxnasm) New tokenizer
This commit is contained in:
parent
bdf45bbdaa
commit
418ae6fa0e
18
src/uxnasm.c
18
src/uxnasm.c
|
@ -456,11 +456,23 @@ resolve(void)
|
||||||
static int
|
static int
|
||||||
assemble(FILE *f)
|
assemble(FILE *f)
|
||||||
{
|
{
|
||||||
|
unsigned int buf;
|
||||||
|
char *cptr = token;
|
||||||
p.ptr = 0x100;
|
p.ptr = 0x100;
|
||||||
scpy("on-reset", p.scope, 0x40);
|
scpy("on-reset", p.scope, 0x40);
|
||||||
while(fscanf(f, "%62s", token) == 1)
|
while(fread(&buf, 1, 1, f)) {
|
||||||
if(slen(token) > 0x3d || !parse(token, f))
|
char c = (char)buf;
|
||||||
return error_asm("Invalid token");
|
if(c < 0x21) {
|
||||||
|
*cptr++ = 0x00;
|
||||||
|
if(token[0])
|
||||||
|
if(!parse(token, f))
|
||||||
|
return 0;
|
||||||
|
cptr = token;
|
||||||
|
} else if(cptr - token < 0x3f)
|
||||||
|
*cptr++ = c;
|
||||||
|
else
|
||||||
|
return error_asm("Token too long");
|
||||||
|
}
|
||||||
return resolve();
|
return resolve();
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue