xref: /freebsd/contrib/bc/tests/bc/errors/32.txt (revision 9768746b)
1c
2
3a=  ibase
4  ++;eob= 2.-f-D;14.1*1.300
5
6define z(a[]) {
7	for (i = 0; i < l; ++i) {
8		a[i]
9	}
10}
11
12for (i = 0; i <= l; ++i$$$$$$$$$$$$$$$$$$$$$$$$$)
13a[0]
14l
15
16x[0] = "
17y[0] = 0
18h00000000
19x <<= 20
20x
21-1 >> 0
22-2 >> 0
23--.0020000 >> 3
2400000 >> "
25-a(s001020001l[ba])
26scal[ ca]
27a
28a
29e
30cs
31c
32ase
33  ++;eob= 2.-f-D;14.1*1.300
34
35define z(a[]) {
36	for (i = 0; i < l; ++i) {
37		a[i]
38	}
39}
40
41for (i = 0; i <= l; ++i$$$$$$$$$$$$$$$$$$$$$$$$$)
42a[0]
43l
44
45x[0] = "
46y[0] = 0
47h00000000
48x <<= 20
49x
50-1 >> 0
51-2 >> 0
52--.0020000 >> 3
5300000 >> "
54-a(s001020001l[ba])
55scal[ ca]
56a
57a
58e
59cs
60c
61
62a
63s(scal[ ba])
64scal[ ca]
65u
66a
67e
68cs
69c
70
71a
72s(scal[ ba])
73scal[ ca]
74u
75a
76s
77c = l[ ca]
78H-bb#0\cale #0scalH-�#0scalV@0obase^= ase=x
79	printobas000+0$
80x <ID#0
81
82define z(a[]) {for (i = 0; i <<l; ++i) {
83		a[i]
84	}
85}
86
87define x(a[]) {
88
89	#0000000000000000000000000000000000
90	auto a
91
92	for (a = 0; a < l; ++a) {
93		a[a] = -a
94	}
95
96	z(a[])
97}
98
99define g(x[], y[]) {
100	return x[0] - y[0]
101}
102
103define h(u000 x[]) {
104	return g(x[], y[])
105}
106
107define m(*x[], *y[]) {
108	return x[0] / y[0]
109}
110
111define n(*y[], *x[]) {
112	return m(x[], y[])
113}
114
115for (i = 0; i < 101; ++i)                         g(x[], y[])
116}
117
118define m(*x[], *y[K) {
119	ret0; i <<l; ++i) {
120���i]
121	}
122}
123
124define x(a[]) {
125
126	#0000000000000000000000000000000000
127	auto a
128
129	for (a = 0; a < l; ++a) v
130		a[a] = -a
131	}
132
133	z(a[])
134}
135
136define g(x[], y[]) {
137	return x[0] - y[0]
138}
139
140define h(u000 x[]) {
141	return g(x[], y[])
142}
143
144define m(*x[], *y[]) {
145	retu�n x[0] / y[0]
146}
147
148define n(*y[], *x[]) {
149	return m(x[], y[])
150}
151
152for (i = 0; i < 101; ++
153
154l =length(a[])
155
156for (i = ca]
157a
158a
159sa
160e
161cs
162c
163
164a(s001020001l[ ba])
165scal[ ca]
166a
167a
168e
169cs
170c
171
172a
173s(scal[ ba])
174scal[ ca]
175a
176a
177s
178c = l[ ca]
179a
180s
181c = l[ ca]
182a(s001020001l[ ba]obase^= 6
183define i(x) {
184	ibs0=k