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

(uxnasm) Housekeeping

Browse source
This commit is contained in:
Devine Lu Linvega 2024-03-27 16:48:56 -07:00
parent 632f9fc0fa
commit 652bff0a93
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

@ -344,27 +344,25 @@ resolveref(Item *r)
*rom = (Sint8)(l->addr - r->addr - 2);
if((Sint8)data[r->addr] != (l->addr - r->addr - 2))
return error_top("Relative reference is too far", r->name);
l->refs++;
break;
case '-':
case '.':
*rom = l->addr;
l->refs++;
break;
case ':':
case '=':
case ';':
*rom++ = l->addr >> 8, *rom = l->addr;
l->refs++;
break;
case '?':
case '!':
default:
a = l->addr - r->addr - 2;
*rom++ = a >> 8, *rom = a;
l->refs++;
break;
}
l->refs++;
return 1;
}
static int