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

(uxnasm) Stop assembling on error

This commit is contained in:
Devine Lu Linvega 2024-03-27 13:18:42 -07:00
parent af87818228
commit 03caf9317b
2 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
etc/hello.tal
View File

@ -1,6 +1,6 @@
( init )
%emit ( byte -- ) { ( macro comment ) #18 DEO }
%emit ( byte -- ) { #18 DEO }
|0100 @program
@ -23,4 +23,4 @@ BRK
@program/extend BRK
@hello-word "Hello 20 "World! 00
@hello-word "Hello 20 "World? 00

4
src/uxnasm.c
View File

@ -54,8 +54,8 @@ static char *push(char *s, char c) { char *o = dictnext; while((*dictnext++ = *s
#define makesublabel(x) push(scat(scat(scpy(scope, sublabel, 0x40), "/"), x), 0)
#define findlabel(x) finditem(x, labels, label_len)
#define findmacro(x) finditem(x, macros, macro_len)
#define error_top(name, msg) !!fprintf(stderr, "%s: %s\n", name, msg)
#define error_asm(name) !!fprintf(stderr, "%s: %s in @%s, %s:%d.\n", name, token, scope, source, ln)
#define error_top(name, msg) !fprintf(stderr, "%s: %s\n", name, msg)
#define error_asm(name) !fprintf(stderr, "%s: %s in @%s, %s:%d.\n", name, token, scope, source, ln)
/* clang-format on */