prog8/examples/test.p8

%import c64lib
%import c64utils
%import c64flt
%zeropage basicsafe


main {
    sub start() {

        A += 50

        A += Y + 1
        A -= Y + 1
        A += Y - 1
        A -= Y - 1

        A += Y + 2
        A -= Y + 2
        A += Y - 2
        A -= Y - 2

;        ubyte ubb
;        byte bb
;        uword uww
;        word ww
;        word ww2
;
;        A = ubb*0
;        Y = ubb*1
;        A = ubb*2
;        Y = ubb*4
;        A = ubb*8
;        Y = ubb*16
;        A = ubb*32
;        Y = ubb*64
;        A = ubb*128
;        Y = ubb+ubb+ubb
;        A = ubb+ubb+ubb+ubb
;        ww = ww2+ww2
;        ww = ww2+ww2+ww2
;        ww = ww2+ww2+ww2+ww2

    }
}
bitmap lines and circles 2020-03-24 23:32:54 +00:00			`%import c64lib`
fix function call arg type mismatch crash 2020-03-14 23:47:21 +00:00			`%import c64utils`
optimized asm output for unneeded typecasts, fixed parent node linking issues with replaceChildNode, Assignment aug_op field is now mutable to avoid having to recreate many Assignment nodes 2020-04-08 22:12:50 +00:00			`%import c64flt`
some slight tweaks to asm for setting float value in array 2020-04-03 20:44:10 +00:00			`%zeropage basicsafe`
fixed some array codegen issues 2019-08-09 00:15:31 +00:00
cleaned up various ast checks/mutations 2020-03-24 18:37:54 +00:00
bitmap lines and circles 2020-03-24 23:32:54 +00:00			`main {`
			`sub start() {`
added some optimizations for >= 0 and <0 comparisons for integers 2020-06-03 23:43:37 +00:00
more assignment expression optimizations 2020-06-04 19:50:31 +00:00			`A += 50`

			`A += Y + 1`
			`A -= Y + 1`
			`A += Y - 1`
			`A -= Y - 1`

			`A += Y + 2`
			`A -= Y + 2`
			`A += Y - 2`
			`A -= Y - 2`
fixed missing repeated constant folding in expression optimization 2020-06-04 18:22:37 +00:00
			`; ubyte ubb`
			`; byte bb`
			`; uword uww`
			`; word ww`
			`; word ww2`
			`;`
			`; A = ubb*0`
			`; Y = ubb*1`
			`; A = ubb*2`
			`; Y = ubb*4`
			`; A = ubb*8`
			`; Y = ubb*16`
			`; A = ubb*32`
			`; Y = ubb*64`
			`; A = ubb*128`
			`; Y = ubb+ubb+ubb`
			`; A = ubb+ubb+ubb+ubb`
			`; ww = ww2+ww2`
			`; ww = ww2+ww2+ww2`
			`; ww = ww2+ww2+ww2+ww2`
added some optimizations for >= 0 and <0 comparisons for integers 2020-06-03 23:43:37 +00:00
added exit(rc) builtin function to immediately exit the program with a return code in A register 2020-03-13 01:05:15 +00:00			`}`
tweaked ast modifications 2020-03-21 17:39:36 +00:00			`}`
cleaned up the way return statements are added to avoid code falling through in/out of subroutines 2020-03-24 21:02:50 +00:00
bitmap lines and circles 2020-03-24 23:32:54 +00:00