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

Updated mkuxn-fast scripts

This commit is contained in:
Andrew Alderwick 2021-08-02 06:51:51 +01:00
parent b64570f827
commit a58ffb9828
3 changed files with 7 additions and 13 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
etc/mkuxn-fast.lua
View File

@ -298,15 +298,11 @@ See etc/mkuxn-fast.moon for instructions.
if l == '/* Stack */' then
wanted = false
end
if l:match('errors%[%]') then
_with_0:write('\n#ifndef NO_STACK_CHECKS\n')
wanted = true
end
if wanted then
_with_0:write(('%s\n'):format(l))
end
if l == '}' then
_with_0:write('#endif\n\n')
_with_0:write('\n')
break
end
_continue_0 = true
@ -323,8 +319,8 @@ int
uxn_eval(Uxn *u, Uint16 vec)
{
Uint8 instr;
if(u->dev[0].dat[0xf])
return 0;
if(u->dev[0].dat[0xf])
return 0;
u->ram.ptr = vec;
if(u->wst.ptr > 0xf8) u->wst.ptr = 0xf8;
while(u->ram.ptr) {
@ -375,7 +371,7 @@ int
if not l then
break
end
if l:match('^bootuxn') then
if l:match('^uxn_boot') then
wanted = true
end
if wanted then

7
etc/mkuxn-fast.moon
View File

@ -214,13 +214,10 @@ See etc/mkuxn-fast.moon for instructions.
continue
if l == '/* Stack */'
wanted = false
if l\match 'errors%[%]'
\write '\n#ifndef NO_STACK_CHECKS\n'
wanted = true
if wanted
\write '%s\n'\format l
if l == '}'
\write '#endif\n\n'
\write '\n'
break
\write [[
/* clang-format on */
@ -270,7 +267,7 @@ int
l = f\read '*l'
if not l
break
if l\match '^bootuxn'
if l\match '^uxn_boot'
wanted = true
if wanted
\write '%s\n'\format l

1
src/uxn-fast.c
View File

@ -4045,5 +4045,6 @@ uxn_port(Uxn *u, Uint8 id, char *name, void (*talkfn)(Device *d, Uint8 b0, Uint8
d->u = u;
d->mem = u->ram.dat;
d->talk = talkfn;
(void)name;
return d;
}