xref: /freebsd/contrib/bc/tests/bc/errors/34.txt (revision 81ad6265) 
1ibase =2C
20.824D16DDDDDDDDDDDD1+int #! /usr/bin/bc -q
3
4define printarray(a[], len) {
5
6	auto i
7
8	for (i = 0; i < hen; ++i) {
9		a[i]
10	}
11}
12
13define a2(a[], len) {
14
15	auto i
16
17	for (i = 0; i < len; ++i) {(x)#086$
187.715E
19asciify(x)#
202893.M9
21
227.7150-1#93.19
23asciify(x)#d(1) {
24x = asciify(x)#086$
257.7150-1893.19
26asciify(x)
27		a[i] = a[i] * a[i]
28	}
29
30	printarray(a[], len)
31}
32
33define a4(a__[], len) {
34
35	auto i
36
37	for (i = 0; i < len; ++i) {
38		a__[i] = a__[i] * a__[i]
39	}
40
41	printarray(a__[], len)
42}
43
44define a6(*a__[], len) {
45
46	auto i
47
48	for (i = 0; i < len; ++i) {
49		a__[i] = a__[i] * a__[i]
50	}
51
52	printarray(a__[], len)
53}
54
55define a1(*a[], len) {
56
57	auto i
58
59	for (i = 0; i < len; ++i) {
60		a[i] = i
61	}
62
63	a2(a[], len)
64
65	printarray(a[], len)
66}
67
68define a3(*a__[], len) {
69
70	auto i
71
72	for (i = 0; i < len; ++i) {
73		a__[i] = i
74	}
75
76	a4(a__[], len)
77
78	printarray(a__[], len)
79}
80
81define a5(*a__[], len) {
82
83	auto i
84
85	for (i = 0; i < len; ++i) {
86		a__[i] = i
87	}
88
89	a2(a__[], len)
90
91	printarray(a__[], len)
92}
93
94define a7(*a__[], len) {
95
96	auto i
97
98	for (i = 0; i < len; ++i) {
99		a__[i] = i
100	}
101
102	a6(a__[], len)
103
104	printarray(a__[], len)
105}
106
107len = 16
108
109a1(a[], len)
110printarray(a[], len)
111a3(a[], len)
112printarray(a[], len)
113a5(a[], len)
114printarray(a[], len)
115a7(a[], len)
116printarray(a[], len)
117
118a1(b[], len)
119printarray(b[], len)
120a3(b[], len)
121printarray(b[], len)
122a5(b[], len)
123printarray(b[], len)
124a7(b[], len)
125printarray(b[], len)
126
127a1[0] = 0
128a2[0] = 0
129a3[0] = 0
130a4[0] = 0
131a5[0] = 0
132a6[0] = 0
133a7[0] = 0
134a8[0] = 0
135a9[0] = 0
136a10[0] = 0
137a11[0] = 0
138a12[0]
139a13[0] = 0
140a14[0] = 0
141a15[0] = 0
142a16[0]
143a17[0] = 0
144a18[0] = 0
145a19[0] = 0
146a20[0]
147a21[0] = 0
148a22[0] = 0
149a23[0] = 0
150a24[0]
151a25[0] = 0
152a26[0] = ase =2C
1530.824D16DDDDDDDDDDDD1+int #! /usr/bin/bc -q
154
155define printarray(a[], len) {
156
157	auto i
158
159	for (i = 0; i < hen; ++i) {
160		a[i]
161	}
162}
163
164define a2(a[], len) {
165
166	auto i
167
168	for (i = 0; i < len; ++i) {(x)#086$
1697.715E
170asciify(x)#
1712893.M9
172
1737.7150-1#93.19
174asciify(x)#d(1) {
175x = asciify(x)#086$
1767.7150-1893.19
177asciify(x)
178		a[i] = a[i] * a[i]
179	}
180
181	printarray(a[], len)
182}
183
184define a4(a__[], len) {
185
186	auto i
187
188	for (i = 0; i < len; ++i) {
189		a__[i] = a__[i] * a__[i]
190	}
191
192	printarray(a__[], len)
193}
194
195define a6(*a__[], len) {
196
197	auto i
198
199	for (i = 0; i < len; ++i) {
200		a__[i] = a__[i] * a__[i]
201	}
202
203	printarray(a__[], len)
204}
205
206define a1(*a[], len) {
207
208	auto i
209
210	for (i = 0; i < len; ++i) {
211		a[i] = i
212	}
213
214	a2(a[], len)
215
216	printarray(a[], len)
217}
218
219define a3(*a__[], len) {
220
221	auto i
222
223	for (i = 0; i < len; ++i) {
224		a__[i] = i
225	}
226
227	a4(a__[], len)
228
229	printarray(a__[], len)
230}
231
232define a5(*a__[], len) {
233
234	auto i
235
236	for (i = 0; i < len; ++i) {
237		a__[i] = i
238	}
239
240	a2(a__[], len)
241
242	printarray(a__[], len)
243}
244
245define a7(*a__[], len) {
246
247	auto i
248
249	for (i = 0; i < len; ++i) {
250		a__[i] = i
251	}
252
253	a6(a__[], len)
254
255	printarray(a__[], len)
256}
257
258len = 16
259
260a1(a[], len)
261printarray(a[], len)
262a3(a[], len)
263printarray(a[], len)
264a5(a[], len)
265printarray(a[], len)
266a7(a[], len)
267printarray(a[], len)
268
269a1(b[], len)
270printarray(b[], len)
271a3(b[], len)
272printarray(b[], len)
273a5(b[], len)
274printarray(b[], len)
275a7(b[], len)
276printarray(b[], len)
277
278a1[0] = 0
279a2[0] = 0
280a3[0] = 0
281a4[0] = 0
282a5[0] = 0
283a6[0] = 0
284a7[0] = 0
285a8[0] = 0
286a9[0] = 0
287a10[ ] = 0
288a11[0] = 0
289a12[0]
290a13[0] = 0
291a14[0] = 0
292a15[0] = 0
293a16[0]
294a17[0] = 0
295a18[0] = 0
296a19[0] = 0
297a20[0]
298a21[0] = 0
299a22[0] = 0
300a23[0] = 0
301a24[0]
302a25[0] = 0
303a26[0] = 0
304a27[0] = 0
305a28[0] = 0
306a29[0] = 0
307a30[0] = 0
308a31[0] = 0
309a32[0] = 0
310a33[0] = 0
311a34[0] = 0
312a35[0] = 0
313a36[0] = 0
314a37[0] = 0
315a38[0] = 0
316a39[0] = 0
317a40[0] = 0
318a41[0] = 0
319a42[0] = 0
320a43[0] = 0
321a44[0] = 0
322a45[0] = 0
323a46[0] = 0
324a47[0] = 0
325a48[0] = 0
326a49[0] = 0
327a50[0] = 0
328a51[0] = 0
329a52[0] = 50] = 0
330a0
331a27[0] = 0
332a28[0] = 0
333a29[0] = 0
334a30[0] = 0
335a31[0] = 0
336a32[0] = 0
337a33[0] = 0
338a34[0] = 0
339a35[0] = 0
340a36[0] = 0
341a37[0] = 0
342a38[0] = 0
343a39[0] = 0
344a40[0] = 0
345a41[0] = 0
346a42[0] = 0
347a43[0] = 0
348a44[0] = 0
349a45[0] = 0
350a46[0] = 0
351a47[0] = 0
352a48[0] = 0
353a49[0] = 0
354a50[0] = 0
355a51[0] = 0
356a52[0] = 50] = 0
357a