File tree Expand file tree Collapse file tree 2 files changed +6
-28
lines changed Expand file tree Collapse file tree 2 files changed +6
-28
lines changed Original file line number Diff line number Diff line change 1- 4.2-SNAPSHOT
1+ 4.2
Original file line number Diff line number Diff line change 1+ % import c64lib
2+ % import c64graphics
13% import c64textio
24;% import c64flt
35;% option enable_floats
4- % zeropage kernalsafe
6+ % zeropage basicsafe
57
68
79main {
810
9- struct Color {
10- ubyte red
11- ubyte green
12- ubyte blue
13- }
14-
15- sub start () {
16-
17- ubyte ub = 9
18- uword yy = 9999 ; this is okay (no 0 - initialization generated ) but ... the next :
19- uword xx = ub ; TODO don ' t generate xx = 0 assignment if it' s initialized with something else ...
20- uword zz
21-
22- Color purple = [1 ,2 ,3 ]
23-
24- uword x1
25- uword x2
26-
27- word dx = x2 - x1 as word
28-
29- ;ub ++
30- ;xx ++
31- ;yy ++
32- ;zz ++
33-
3411;asmsub clear_screen (ubyte char @ A , ubyte color @ Y ) clobbers (A ) { ... }
3512; TODO dont cause name conflict if we define sub or sub with param ' color' or even a var ' color' later .
3613
3714; sub color (... ) {}
3815; sub other (ubyte color ) {} ; TODO don ' t cause name conflict
3916
40- }
4117
18+ sub start () {
19+ }
4220}
You can’t perform that action at this time.
0 commit comments