commit a58ffb982806510b9d98640fa9f92c373c08d6df
parent b64570f827af955dd524ceb583c46cbc45cc98e5
Author: Andrew Alderwick <andrew@alderwick.co.uk>
Date: Mon, 2 Aug 2021 06:51:51 +0100
Updated mkuxn-fast scripts
Diffstat:
3 files changed, 7 insertions(+), 13 deletions(-)
diff --git a/etc/mkuxn-fast.lua b/etc/mkuxn-fast.lua
@@ -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
diff --git a/etc/mkuxn-fast.moon b/etc/mkuxn-fast.moon
@@ -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
diff --git a/src/uxn-fast.c b/src/uxn-fast.c
@@ -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;
}