hofmann's projects
/
dragonfly.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
blame
|
history
|
raw
|
HEAD
Fix a compiler warning by pre-declaring struct vnode;
[dragonfly.git]
/
contrib
/
awk
/
test
/
fnparydl.awk
1
# fnparydl.awk --- check that deleting works with arrays
2
# that are parameters.
3
#
4
# Tue Jul 11 14:20:58 EDT 2000
5
6
function delit(a, k)
7
{
8
print "BEFORE LOOP"
9
for (k in a) {
10
print "DELETING KEY", k
11
delete a[k]
12
}
13
print "AFTER LOOP"
14
}
15
16
BEGIN {
17
for (i = 1 ; i <= 7; i++) {
18
q[i] = sprintf("element %d", i)
19
x[i] = i
20
y[i] = q[i]
21
}
22
# adump(q)
23
delit(q)
24
# for (i in q)
25
# delete q[i]
26
j = 0;
27
for (i in q)
28
j++
29
print j, "elements still in q[]"
30
# adump(q)
31
}