C02/test/arrays.c02

/* Test C02 array manipulation */

#pragma origin 1000


char b, c, i;

char r[255];
char s = "string";
char d = {'0', '1', '2', '3', '4', '5', '6', '7', '8', '9'};
char n = {1, 2, 3, 4, 5, 6, 7, 8, 9};

char func();

c = d[3];
b = n[i];
b = s[n[i]]; 
b = s[c + n[i-1]];
b = s[func()];
b = s[0] & d[c-1] | n[i+2]; 
b = s[A] + b[X] + c[Y];

pop b, d[i], n[func()], s[c-n[i+3]];