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

(uxnasm) Fixed issue where some unused labels did not throw a warning

Browse source
This commit is contained in:
Devine Lu Linvega 2024-08-25 10:05:47 -07:00
parent 58d6594790
commit af59c09627
1 changed files with 3 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
src/uxnasm.c
View file

@ -219,6 +219,7 @@ makeref(char *label, char rune, Uint16 addr, Context *ctx)
if(label[0] == '{') { if(label[0] == '{') {
lambda_stack[lambda_ptr++] = lambda_len; lambda_stack[lambda_ptr++] = lambda_len;
r->name = push(makelambda(lambda_len++), 0); r->name = push(makelambda(lambda_len++), 0);
if(label[1]) return error_asm("Label invalid");
} else if(label[0] == '&' || label[0] == '/') { } else if(label[0] == '&' || label[0] == '/') {
r->name = join(scope, '/', label + 1); r->name = join(scope, '/', label + 1);
} else } else
@ -380,7 +381,7 @@ build(char *rompath)
if(!(dst = fopen(rompath, "wb"))) if(!(dst = fopen(rompath, "wb")))
return !error_top("Output file invalid", rompath); return !error_top("Output file invalid", rompath);
for(i = 0; i < labels_len; i++) for(i = 0; i < labels_len; i++)
if(labels[i].name[0] - 'A' > 25 && !labels[i].refs) if(!labels[i].refs && (unsigned char)(labels[i].name[0] - 'A') > 25)
printf("-- Unused label: %s\n", labels[i].name); printf("-- Unused label: %s\n", labels[i].name);
fwrite(data + PAGE, length - PAGE, 1, dst); fwrite(data + PAGE, length - PAGE, 1, dst);
printf( printf(
@ -410,7 +411,7 @@ main(int argc, char *argv[])
{ {
ptr = PAGE; ptr = PAGE;
copy("on-reset", scope, 0); copy("on-reset", scope, 0);
if(argc == 2 && scmp(argv[1], "-v", 2)) return !printf("Uxnasm - Uxntal Assembler, 30 May 2024.\n"); if(argc == 2 && scmp(argv[1], "-v", 2)) return !printf("Uxnasm - Uxntal Assembler, 25 Aug 2024.\n");
if(argc != 3) return error_top("usage", "uxnasm [-v] input.tal output.rom"); if(argc != 3) return error_top("usage", "uxnasm [-v] input.tal output.rom");
if(!assemble(argv[1])) return 1; if(!assemble(argv[1])) return 1;
if(!resolve(argv[2])) return 1; if(!resolve(argv[2])) return 1;