mirror of
https://github.com/irmen/prog8.git
synced 2024-06-01 06:41:42 +00:00
20 lines
309 B
Lua
20 lines
309 B
Lua
%import diskio
|
|
%zeropage basicsafe
|
|
%option no_sysinit
|
|
|
|
main {
|
|
sub start() {
|
|
bool @shared flag
|
|
|
|
cx16.r0L = test(12345, flag, -42)
|
|
|
|
}
|
|
|
|
asmsub test(uword arg @AY, bool flag @Pc, byte value @X) -> ubyte @A, bool @Pc {
|
|
%asm {{
|
|
txa
|
|
rts
|
|
}}
|
|
}
|
|
}
|