Browse Source

Updated metas

main
Devine Lu Linvega 1 year ago
parent
commit
dbb111376d
  1. 92
      src/uxnasm.c
  2. 2
      src/uxncli.c
  3. 2
      src/uxnemu.c

92
src/uxnasm.c

@ -14,6 +14,15 @@ WITH REGARD TO THIS SOFTWARE.
/* clang-format off */
#define PAGE 0x0100
#define ishex(x) (shex(x) >= 0)
#define isopc(x) (findopcode(x) || scmp(x, "BRK", 4))
#define isinvalid(x) (!x[0] || ishex(x) || isopc(x) || find(runes, x[0]) >= 0)
#define writeshort(x) (writebyte(x >> 8, ctx) && writebyte(x & 0xff, ctx))
#define findlabel(x) finditem(x, labels, labels_len)
#define findmacro(x) finditem(x, macros, macro_len)
#define error_top(id, msg) !printf("%s: %s\n", id, msg)
#define error_asm(id) !printf("%s: %s in @%s, %s:%d.\n", id, token, scope, ctx->path, ctx->line)
#define error_ref(id) !printf("%s: %s, %s:%d\n", id, r->name, r->data, r->line)
typedef unsigned char Uint8;
typedef signed char Sint8;
@ -37,26 +46,66 @@ static char ops[][4] = {
"ADD", "SUB", "MUL", "DIV", "AND", "ORA", "EOR", "SFT"
};
static int find(char *s, char t) { int i = 0; char c; while((c = *s++)) { if(c == t) return i; i++; } return -1; }
static int shex(char *s) { int d, n = 0; char c; while((c = *s++)) { d = find(hexad, c); if(d < 0) return d; n = n << 4, n |= d; } return n; }
static int scmp(char *a, char *b, int len) { int i = 0; while(a[i] == b[i]) if(!a[i] || ++i >= len) return 1; return 0; }
static char *copy(char *src, char *dst, char c) { while(*src && *src != c) *dst++ = *src++; *dst++ = 0; return dst; }
static char *save(char *s, char c) { char *o = dictnext; while((*dictnext++ = *s++) && *s){}; *dictnext++ = c; return o; }
static char *join(char *a, char j, char *b) { char *res = dictnext; save(a, j), save(b, 0); return res; }
/* clang-format on */
#define ishex(x) (shex(x) >= 0)
#define isopc(x) (findopcode(x) || scmp(x, "BRK", 4))
#define isinvalid(x) (!x[0] || ishex(x) || isopc(x) || find(runes, x[0]) >= 0)
#define writeshort(x) (writebyte(x >> 8, ctx) && writebyte(x & 0xff, ctx))
#define findlabel(x) finditem(x, labels, labels_len)
#define findmacro(x) finditem(x, macros, macro_len)
#define error_top(id, msg) !printf("%s: %s\n", id, msg)
#define error_asm(id) !printf("%s: %s in @%s, %s:%d.\n", id, token, scope, ctx->path, ctx->line)
#define error_ref(id) !printf("%s: %s, %s:%d\n", id, r->name, r->data, r->line)
static int
find(char *s, char t)
{
int i = 0;
char c;
while((c = *s++)) {
if(c == t) return i;
i++;
}
return -1;
}
/* clang-format on */
static int
shex(char *s)
{
int d, n = 0;
char c;
while((c = *s++)) {
d = find(hexad, c);
if(d < 0) return d;
n = n << 4, n |= d;
}
return n;
}
static int parse(char *w, FILE *f, Context *ctx);
static int
scmp(char *a, char *b, int len)
{
int i = 0;
while(a[i] == b[i])
if(!a[i] || ++i >= len) return 1;
return 0;
}
static char *
copy(char *src, char *dst, char c)
{
while(*src && *src != c) *dst++ = *src++;
*dst++ = 0;
return dst;
}
static char *
save(char *s, char c)
{
char *o = dictnext;
while((*dictnext++ = *s++) && *s);
*dictnext++ = c;
return o;
}
static char *
join(char *a, char j, char *b)
{
char *res = dictnext;
save(a, j), save(b, 0);
return res;
}
static char *
push(char *s, char c)
@ -119,6 +168,8 @@ walkcomment(FILE *f, Context *ctx)
return error_asm("Comment incomplete");
}
static int parse(char *w, FILE *f, Context *ctx);
static int
walkmacro(Item *m, Context *ctx)
{
@ -415,10 +466,7 @@ main(int argc, char *argv[])
{
ptr = PAGE;
copy("on-reset", scope, 0);
if(argc == 2 && scmp(argv[1], "-v", 2)) return !printf("Uxnasm - Uxntal Assembler, 25 Aug 2024.\n");
if(argc == 2 && scmp(argv[1], "-v", 2)) return !printf("Uxnasm - Uxntal Assembler, 14 Nov 2024.\n");
if(argc != 3) return error_top("usage", "uxnasm [-v] input.tal output.rom");
if(!assemble(argv[1])) return 1;
if(!resolve(argv[2])) return 1;
if(!build(argv[2])) return 1;
return 0;
return !assemble(argv[1]) || !resolve(argv[2]) || !build(argv[2]);
}

2
src/uxncli.c

@ -47,7 +47,7 @@ main(int argc, char **argv)
{
int i = 1;
if(argc == 2 && argv[1][0] == '-' && argv[1][1] == 'v')
return !fprintf(stdout, "Uxn11(cli) - Varvara Emulator, 27 Nov 2024.\n");
return !fprintf(stdout, "Uxn(cli) - Varvara Emulator, 27 Nov 2024.\n");
else if(argc == 1)
return !fprintf(stdout, "usage: %s [-v] file.rom [args..]\n", argv[0]);
else if(!system_boot((Uint8 *)calloc(0x10000 * RAM_PAGES, sizeof(Uint8)), argv[i++]))

2
src/uxnemu.c

@ -473,7 +473,7 @@ main(int argc, char **argv)
/* flags */
if(argc > 1 && argv[i][0] == '-') {
if(!strcmp(argv[i], "-v"))
return system_error("Uxnemu - Varvara Emulator", "27 Nov 2024.");
return system_error("Uxn(gui) - Varvara Emulator", "27 Nov 2024.");
else if(!strcmp(argv[i], "-2x"))
set_zoom(2, 0);
else if(!strcmp(argv[i], "-3x"))

Loading…
Cancel
Save