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

(uxnasm)Optimize tail-call for subroutines too

This commit is contained in:
Devine Lu Linvega 2022-05-31 13:55:00 -07:00
parent 3c06af41c3
commit 18b73f4861
1 changed files with 9 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
src/uxnasm.c
View File

@ -208,12 +208,18 @@ static int
writeopcode(char *w)
{
Uint8 res;
if(jsrlast && scmp(w, "JMP2r", 5)) { /* combine JSR2 JMP2r */
p.data[p.ptr - 1] = findopcode("JMP2");
return jsrlast--;
/* tail-call optimization */
if(scmp(w, "JMP2r", 5)) {
if(jsrlast) {
p.data[p.ptr - 1] = jsrlast == 2 ? findopcode("JMP2") : findopcode("JMP");
jsrlast = 0;
return 1;
}
}
res = writebyte(findopcode(w));
if(scmp(w, "JSR2", 4))
jsrlast = 2;
else if(scmp(w, "JSR", 3))
jsrlast = 1;
return res;
}