d6
/
uxn-utils
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

(meta) Do not print empty string

This commit is contained in:
neauoire 2023-11-17 11:25:35 -08:00
parent 2c6e19ed2f
commit 7ec46a0494
1 changed files with 9 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
gui/meta/meta.tal
View File

@ -45,7 +45,7 @@
BRK } BRK }
<load-metadata> <load-metadata>
;metadata/body DUP2 ;metadata/body DUP2
( cli ) <pstr-ln> ( cli ) <pstr-ln>/
( gui ) <draw-metadata> ( gui ) <draw-metadata>
BRK BRK
@ -88,8 +88,10 @@
[ LIT2 09 18 ] DEO [ LIT2 09 18 ] DEO
#00 OVR #03 MUL ;metadata/fields ADD2 #00 OVR #03 MUL ;metadata/fields ADD2
( icon ) LDAk #83 NEQ ?{ INC2k LDA2 <draw-icon> } ( icon ) LDAk #83 NEQ ?{ INC2k LDA2 <draw-icon> }
( byte ) LDAk phex/b #2018 DEO ( byte ) LDAk <phex>/b
( shorts ) INC2 LDA2 phex #0a18 DEO #2018 DEO
( shorts ) INC2 LDA2 <phex>
#0a18 DEO
INC GTHk ?&l INC GTHk ?&l
POP2 JMP2r POP2 JMP2r
@ -142,10 +144,10 @@
#00 SWP sput #00 JMP2r #00 SWP sput #00 JMP2r
&eval POP2 #01 JMP2r &eval POP2 #01 JMP2r
@phex ( short* -- ) @<phex> ( short* -- )
SWP phex/b SWP <phex>/b
&b ( -- ) &b ( -- )
DUP #04 SFT phex/c DUP #04 SFT <phex>/c
&c ( -- ) &c ( -- )
#0f AND DUP #09 GTH #27 MUL ADD [ LIT "0 ] ADD #18 DEO #0f AND DUP #09 GTH #27 MUL ADD [ LIT "0 ] ADD #18 DEO
JMP2r JMP2r
@ -153,7 +155,7 @@
@<pstr-ln> ( str* -- ) @<pstr-ln> ( str* -- )
&w ( -- ) &w ( -- )
LDAk #18 DEO LDAk #18 DEO
INC2 LDAk ?&w INC2 & LDAk ?&w
POP2 #0a18 DEO POP2 #0a18 DEO
JMP2r JMP2r