mirror of
https://github.com/irmen/prog8.git
synced 2024-11-20 03:32:05 +00:00
26 lines
600 B
Lua
26 lines
600 B
Lua
%import textio
|
|
%import diskio
|
|
%import floats
|
|
%import graphics
|
|
%zeropage basicsafe
|
|
%import test_stack
|
|
%option no_sysinit
|
|
|
|
main {
|
|
sub start () {
|
|
|
|
uword bitmap_load_address = progend()
|
|
uword max_bitmap_size = $9eff - bitmap_load_address ; TODO why is this not optimized away?
|
|
|
|
; foo(2**x) ; TODO arg is zero if x=8, in the function. Param type uword. fix that . also check bit shift
|
|
; foo($0001<<x) ; TODO fix crash
|
|
|
|
uword xx = progend()
|
|
txt.print_uwhex(xx, 1)
|
|
txt.print_uwhex(progend(), 1)
|
|
|
|
test_stack.test()
|
|
}
|
|
|
|
}
|