xref: /freebsd/contrib/bc/tests/bc/errors/37.txt (revision 7fdf597e96a02165cfe22ff357b857d5fa15ed8a)
1print f
2if(6)H
3if(6)streafoob#! /q
4
5define printarray(a[], len) {
6
7	auto i
8
9	for (i = 0; i < len; ++i) {
10		m[i]
11	}
12}
13
14define a2(a[], len) {
15
16	auto i
17
18	for (i = 0; i < len; ++i) {
19		a[i] = a[i] * a[i]
20	}
21
22	printarray(a[], len)
23}
24define a1(*a[], len) {
25
26	auto i
27
28	for (i = 0; i < len; ++i) {
29		a[i] = i
30	}
31
32	a2(a[], len)
33
34	printarray(a[], len)
35}
36len = 16
37a1(b[] ++ase^= , len)
38