0
0
Fork 0
mirror of https://git.sr.ht/~rabbits/uxn synced 2024-11-26 07:45:14 +00:00

Removed templating macros in assembler

This commit is contained in:
neauoire 2021-04-24 17:12:25 -07:00
parent 72b0458745
commit 19157a9ae1
5 changed files with 25 additions and 35 deletions

View file

@ -32,7 +32,7 @@ else
fi
echo "Assembling.."
./bin/assembler projects/demos/bifurcan.usm bin/boot.rom
./bin/assembler projects/software/nasu.usm bin/boot.rom
echo "Running.."
if [ "${2}" = '--cli' ];

View file

@ -24,6 +24,12 @@ contexts:
- match: '\.(\S+)\sPOK'
scope: constant.numeric
pop: true
- match: '\.(\S+)\sGET2'
scope: constant.numeric
pop: true
- match: '\.(\S+)\sGET'
scope: constant.numeric
pop: true
- match: '\.(\S+)\sDEI2'
scope: entity.name.type.typedef
@ -37,6 +43,12 @@ contexts:
- match: '\.(\S+)\sPEK'
scope: entity.name.type.typedef
pop: true
- match: '\.(\S+)\sPUT2'
scope: entity.name.type.typedef
pop: true
- match: '\.(\S+)\sPUT'
scope: entity.name.type.typedef
pop: true
# label
- match: '\@(\S+)\s?'

View file

@ -12,7 +12,6 @@
Select paint color for 2-bit mode
)
%RTN { JMP2r }
%STEP8 { #0033 SFT2 }
@ -726,7 +725,7 @@ RTN
[ 0038 4492 2810 0000 ] ( open )
[ 0000 0082 4438 0000 ] ( closed )
@tool_selector [ 80c0 e0f0 f8e0 1000 ]
@tool_hand [ 4040 4070 f8f8 f870 ]
@tool_hand [ 2020 20b8 7c7c 3838 ]
@tool_eraser [ 2050 b87c 3e1c 0800 ]
@moveup_icn [ 0010 387c fe10 1000 ]
@movedown_icn [ 0010 1010 fe7c 3810 ]

View file

@ -943,7 +943,7 @@ RTN
@pointers_icn
[ 80c0 e0f0 f8e0 1000 ]
[ 4040 4070 f8f8 f870 ]
[ 2020 20b8 7c7c 3838 ]
@eye_icn
[ 0038 4492 2810 0000 ] ( open )

View file

@ -92,9 +92,6 @@ findmacro(char *name)
for(i = 0; i < p.mlen; ++i)
if(scmp(p.macros[i].name, name, 64))
return &p.macros[i];
for(i = 0; i < p.mlen; ++i)
if(p.macros[i].name[0] == '%' && ssin(name, p.macros[i].name + 1) != -1)
return &p.macros[i];
return NULL;
}
@ -131,25 +128,10 @@ findopcode(char *s)
return 0;
}
char *template(char *src, char *dst, char *w, Macro *m)
{
char input[64];
if(scin(src, '%') == -1)
return src;
scpy(w, input, ssin(w, m->name + 1) + 1);
scpy(src, dst, scin(src, '%') + 1);
scat(dst, input);
scat(dst, src + scin(src, '%') + 1);
return dst;
}
char *
sublabel(char *src, char *scope, char *name)
{
scpy(scope, src, 64);
scpy("/", src + slen(src), 64);
scpy(name, src + slen(src), 64);
return src;
return scat(scat(scpy(scope, src, 64), "/"), name);
}
#pragma mark - Parser
@ -237,9 +219,8 @@ walktoken(char *w)
}
if((m = findmacro(w))) {
int i, res = 0;
char templated[64];
for(i = 0; i < m->len; ++i)
res += walktoken(template(m->items[i], templated, w, m));
res += walktoken(m->items[i]);
return res;
}
return error("Unknown label in first pass", w);
@ -286,20 +267,18 @@ parsetoken(char *w)
else
return 0;
return 1;
} else if((m = findmacro(w))) {
int i;
for(i = 0; i < m->len; ++i) {
char templated[64];
if(!parsetoken(template(m->items[i], templated, w, m)))
return 0;
}
return ++m->refs;
} else if(sihx(w)) {
if(slen(w) == 2)
pushbyte(shex(w), 0);
else if(slen(w) == 4)
pushshort(shex(w), 0);
return 1;
} else if((m = findmacro(w))) {
int i;
for(i = 0; i < m->len; ++i)
if(!parsetoken(m->items[i]))
return 0;
return ++m->refs;
}
return 0;
}
@ -337,7 +316,7 @@ pass1(FILE *f)
int
pass2(FILE *f)
{
int ccmnt = 0, ctemplate = 0;
int ccmnt = 0, cmacr = 0;
char w[64], scope[64], subw[64];
printf("Pass 2\n");
while(fscanf(f, "%s", w) == 1) {
@ -346,7 +325,7 @@ pass2(FILE *f)
if(w[0] == '[') continue;
if(w[0] == ']') continue;
if(skipblock(w, &ccmnt, '(', ')')) continue;
if(skipblock(w, &ctemplate, '{', '}')) continue;
if(skipblock(w, &cmacr, '{', '}')) continue;
if(w[0] == '|') {
if(p.length && shex(w + 1) < p.ptr)
return error("Memory Overwrite", w);