commit 364172f
Devine Lu Linvega
·
2024-04-03 16:07:51 +0000 UTC
parent 10bb933
(uxnasm) Fixed issue with long hex values
1 files changed,
+2,
-2
+2,
-2
1@@ -303,7 +303,7 @@ parse(char *w, FILE *f, Context *ctx)
2 case '@': return makelabel(w + 1, 1, ctx);
3 case '&': return makelabel(w, 0, ctx);
4 case '}': return makelabel(makelambda(lambda_stack[--lambda_ptr]), 0, ctx);
5- case '#': return ishex(w + 1) && writehex(w, ctx);
6+ case '#': return writehex(w, ctx);
7 case '_': return makeref(w + 1, w[0], ptr) && writebyte(0xff, ctx);
8 case ',': return makeref(w + 1, w[0], ptr + 1) && writebyte(findopcode("LIT"), ctx) && writebyte(0xff, ctx);
9 case '-': return makeref(w + 1, w[0], ptr) && writebyte(0xff, ctx);
10@@ -403,7 +403,7 @@ main(int argc, char *argv[])
11 {
12 ptr = PAGE;
13 copy("on-reset", scope, 0);
14- if(argc == 2 && scmp(argv[1], "-v", 2)) return !printf("Uxnasm - Uxntal Assembler, 2 Apr 2024.\n");
15+ if(argc == 2 && scmp(argv[1], "-v", 2)) return !printf("Uxnasm - Uxntal Assembler, 3 Apr 2024.\n");
16 if(argc != 3) return error_top("usage", "uxnasm [-v] input.tal output.rom");
17 if(!assemble(argv[1])) return 1;
18 if(!resolve(argv[2])) return 1;