Apple-2-SW/prog8
1
0
Fork 0
mirror of https://github.com/irmen/prog8.git synced 2025-01-14 01:29:55 +00:00
Code Issues Projects Releases Wiki Activity

address-of works the test program

Browse Source
This commit is contained in:
Irmen de Jong 2019-04-12 00:58:40 +02:00
parent cd0fa9405a
commit 78ddcf9db7
1 changed files with 8 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
examples/test.p8
View File

@ -23,7 +23,7 @@
pointer2 = &array2 pointer2 = &array2
pointer3 = &string1 pointer3 = &string1
uword[4] pointers = [&array1, &array2, &string1, &string2] ; @todo make it possible to initialize array with pointers uword[4] pointers = [&array1, &array2, &string1, &string2]
ptrsubasm("moet werken") ptrsubasm("moet werken")
@ -45,6 +45,13 @@
pointersub(&array2) pointersub(&array2)
pointersub(&string1) pointersub(&string1)
pointersub(&string2) pointersub(&string2)
c64scr.print_uwhex(1, pointers[0])
c64.CHROUT(',')
c64scr.print_uwhex(1, pointers[1])
c64.CHROUT(',')
c64scr.print_uwhex(1, pointers[2])
c64.CHROUT(',')
c64scr.print_uwhex(1, pointers[3])
} }