prog8/examples/test.p8

%import textio
%option no_sysinit
%zeropage basicsafe

main {

    sub start() {
        cx16.r0=0

        if cx16.r0==0
            cx16.r1L=42
        else
            cx16.r1L=99

        cx16.r2L = if cx16.r0==0 42 else 99

        if cx16.r0==33
            cx16.r1L=42
        else
            cx16.r1L=99

        cx16.r2L = if cx16.r0==33 42 else 99

        if cx16.r0!=3333
            cx16.r1L=42
        else
            cx16.r1L=99

        cx16.r2L = if cx16.r0!=3333 42 else 99

        if cx16.r0!=0
            cx16.r1L=42
        else
            cx16.r1L=99

        cx16.r2L = if cx16.r0!=0 42 else 99

        if cx16.r0!=33
            cx16.r1L=42
        else
            cx16.r1L=99

        cx16.r2L = if cx16.r0!=0 42 else 99

        if cx16.r0==cx16.r9
            cx16.r1L=42
        else
            cx16.r1L=99

        cx16.r2L = if cx16.r0==cx16.r9 42 else 99

        if cx16.r0!=cx16.r9
            cx16.r1L=42
        else
            cx16.r1L=99

        cx16.r2L = if cx16.r0!=cx16.r9 42 else 99

        if cx16.r0>cx16.r1
            cx16.r1L=42
        else
            cx16.r1L=99

        cx16.r2L = if cx16.r0>cx16.r1 42 else 99
    }
}
added alias statement 2024-10-27 20:50:48 +00:00			`%import textio`
remove support for array-to-array assignments (other than initialization of variable declaration) Just use an explicit sys.memcopy(src, dest, sizeof(dest)) or assign array members individually. 2024-10-13 17:37:25 +00:00			`%option no_sysinit`
added alias statement 2024-10-27 20:50:48 +00:00			`%zeropage basicsafe`
more defer sanity checks 2024-10-18 20:22:34 +00:00
add sys.sizeof_byte, _word, _float constants because Antlr doesn't allow the grammar to contain a sizeof(typename) rule to override the sizeof(identifier) rule 2024-10-07 17:17:37 +00:00			`main {`
vm: implemented reading/writing files in diskio 2024-10-29 00:09:25 +00:00
new block merge semantics and implementation 2024-10-29 21:57:54 +00:00			`sub start() {`
tweak & fix if expression with word condition 2024-11-02 17:40:10 +00:00			`cx16.r0=0`

			`if cx16.r0==0`
			`cx16.r1L=42`
			`else`
			`cx16.r1L=99`

			`cx16.r2L = if cx16.r0==0 42 else 99`

			`if cx16.r0==33`
			`cx16.r1L=42`
			`else`
			`cx16.r1L=99`

			`cx16.r2L = if cx16.r0==33 42 else 99`

			`if cx16.r0!=3333`
			`cx16.r1L=42`
			`else`
			`cx16.r1L=99`

			`cx16.r2L = if cx16.r0!=3333 42 else 99`

			`if cx16.r0!=0`
			`cx16.r1L=42`
			`else`
			`cx16.r1L=99`

			`cx16.r2L = if cx16.r0!=0 42 else 99`
vm: implemented reading/writing files in diskio 2024-10-29 00:09:25 +00:00
tweak & fix if expression with word condition 2024-11-02 17:40:10 +00:00			`if cx16.r0!=33`
			`cx16.r1L=42`
			`else`
			`cx16.r1L=99`

			`cx16.r2L = if cx16.r0!=0 42 else 99`

			`if cx16.r0==cx16.r9`
			`cx16.r1L=42`
			`else`
			`cx16.r1L=99`

			`cx16.r2L = if cx16.r0==cx16.r9 42 else 99`

			`if cx16.r0!=cx16.r9`
			`cx16.r1L=42`
			`else`
			`cx16.r1L=99`

			`cx16.r2L = if cx16.r0!=cx16.r9 42 else 99`

			`if cx16.r0>cx16.r1`
			`cx16.r1L=42`
			`else`
			`cx16.r1L=99`

			`cx16.r2L = if cx16.r0>cx16.r1 42 else 99`
			`}`
fixed a variable scopedname issue where it took the fully scoped name instead of just the local name this made 64tass not strip out that code if it was unused 2024-09-14 21:17:26 +00:00			`}`