1"This tests arrays! 2" 3define p(a[],x,y) { 4 auto i; 5 for (i=x; i<y; i++) a[i]; 6} 7 8define m(a[],x,y) { 9 auto i; 10 for (i=x; i<y; i++) a[i] = i; 11} 12 13define m1(*a[],x,y) { 14 auto i; 15 print "m1\n" 16 for (i=x; i<y; i++) a[i] = i; 17} 18 19for (i=0; i<10; i++) a[i] = i; 20j = p(a[],0,10); 21 22j = m(b[],0,10); 23j = p(b[],0,10); 24 25print "---\n"; 26j = m1(b[],0,10); 27j = p(b[],0,10); 28 29quit 30 31