prog8/examples/test.p8

main {

    uword global1 = 1234

    sub start() {

        ; TODO should generate address
        uword @shared slab1 = memory("slab 1", 2000, 0)
        uword @shared slab2 = memory("slab 1", 2000, 0)
        uword @shared slab3 = memory("other # slab", 2000, 64)
        &uword mapped = $c000

        uword @shared zz = slab1+slab2+slab3

        uword @shared qq = zz
        uword @shared qq2 = &zz

        qq=4242             ; TODO should generate symbol not allocated address
        mapped = 42     ; TODO wrong VMASM code generated... should generate mapped memory address

        qq=global1
        qq=other.global2
        nested()
        main.start.nested.nested2()

        ; TODO flatten nested subroutines in codegen
        sub nested() {
            qq++
            txt.print("zzz")
            nested2()

            sub nested2() {
                txt.print("zzz2")
                qq++
            }
        }
    }
}

other {

    uword global2 = 9999

}