Apple-2-SW/prog8
1
0
Fork 0
mirror of https://github.com/irmen/prog8.git synced 2024-11-26 11:49:22 +00:00
Code Issues Projects Releases Wiki Activity

removed restriction on array indexer expression again from docs and code... :)

Browse Source
This commit is contained in:
Irmen de Jong 2020-10-18 14:05:26 +02:00
parent b9706a180b
commit 74b5124a42
4 changed files with 7 additions and 15 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
docs/source/programming.rst
View File

@ -254,14 +254,6 @@ Array types are also supported. They can be made of bytes, words or floats, stri
This means byte arrays should be <= 256 elements, word arrays <= 128 elements, and float
arrays <= 51 elements.
.. note::
To avoid slow and complex assembly code generation, Prog8 currently enforces some limits on
what you can index the array with. *It is not possible to use an arbitrary expression/calculation as an index value*.
You can use a numerical constant value or a single variable as an index value, and simple expressions such as
"i+1" or "i*2". If you need more complex indexing expressions, the compiler refuses the statement and
will suggest to use a temporary indexer variable instead.
You can split an array initializer list over several lines if you want.
Note that the various keywords for the data type and variable type (``byte``, ``word``, ``const``, etc.)

3
examples/cube3d-sprites.p8
View File

@ -166,8 +166,7 @@ main {
else
c64.SPRPTR[i] = $2000/64 ; small ball
ubyte scolor = (zc>>13) as ubyte + 4
c64.SPCOL[i] = spritecolors[scolor] ; further away=darker color
c64.SPCOL[i] = spritecolors[(zc>>13) as ubyte + 4] ; further away=darker color
}
}
}

3
examples/primes.p8
View File

@ -43,8 +43,7 @@ main {
while multiple < len(sieve) {
ubyte number = lsb(multiple)
sieve[number] = true
sieve[lsb(multiple)] = true
multiple += candidate_prime
}
return candidate_prime

8
examples/textelite.p8
View File

@ -314,7 +314,6 @@ market {
ubyte[17] units = [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 2, 0]
str[17] names = ["Food", "Textiles", "Radioactives", "Slaves", "Liquor/Wines", "Luxuries", "Narcotics", "Computers",
"Machinery", "Alloys", "Firearms", "Furs", "Minerals", "Gold", "Platinum", "Gem-Stones", "Alien Items"]
str[3] unitnames = ["t", "kg", "g"]
ubyte[17] current_quantity = 0
uword[17] current_price = 0
@ -360,8 +359,11 @@ market {
util.print_10s(current_price[ci])
txt.print(" ")
txt.print_ub(current_quantity[ci])
ubyte unit = units[ci]
txt.print(unitnames[unit])
when units[ci] {
0 -> txt.chrout('t')
1 -> txt.print("kg")
2 -> txt.chrout('g')
}
txt.print(" ")
txt.print_ub(ship.cargohold[ci])
txt.chrout('\n')