projects
/
oweals
/
busybox.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
3bb680178f74e46fad54b530fa95d9945398b86a
[oweals/busybox.git]
/
testsuite
/
bc_array.bc
1
#! /usr/bin/bc -q
2
3
define z(a[]) {
4
for (i = 0; i < l; ++i) {
5
a[i]
6
}
7
}
8
9
define x(a[]) {
10
11
for (i = 0; i < l; ++i) {
12
a[i] = -i
13
}
14
15
z(a[])
16
}
17
18
for (i = 0; i < 101; ++i) {
19
a[i] = i
20
}
21
22
a[104] = 204
23
24
l = length(a[])
25
26
for (i = 0; i <= l; ++i) {
27
a[i]
28
}
29
30
z(a[])
31
x(a[])
32
z(a[])
33
l
34
35
halt