It seems like the act of reading a const array either mangles the array or subsequent reads are reading the wrong thing. This is a regression from 1.2.
@OPTION SYSTEM vic20.orig ' 1 ' 2631 ' 84268421 const PIPS(5) as u8 = % .X...... ..X....X .X..XX.. ..X.XX.X .XX.XX.X ..XXXXXX END% print PIPS[2]; " "; PIPS[2] & 1 > 0 print PIPS[2]; " "; PIPS[2] & 2 > 0 print PIPS[2]; " "; PIPS[2] & 4 > 0 print PIPS[2]; " "; PIPS[2] & 8 > 0 print PIPS[2]; " "; PIPS[2] & 16 > 0 print PIPS[2]; " "; PIPS[2] & 32 > 0 print PIPS[2]; " "; PIPS[2] & 64 > 0 print PIPS[2]; " "; PIPS[2] & 128 > 0
Output (I would expect to see 76s all the way down the first column):
**** cbm basic v2 **** 3583 bytes free ready. load"pips",8,1 searching for pips loading ready. run: 76 1 255 1 255 1 255 1 255 1 255 1 255 1 255 1 ready.