File: lintwarn.awk

package info (click to toggle)
gawk 1%3A5.2.1-2
  • links: PTS
  • area: main
  • in suites: bookworm, trixie
  • size: 25,256 kB
  • sloc: ansic: 54,687; awk: 14,521; yacc: 6,814; sh: 6,418; makefile: 3,004; sed: 119; python: 31; csh: 6
file content (43 lines) | stat: -rw-r--r-- 463 bytes parent folder | download | duplicates (2) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
 
# gawk --lint -f lintwarn.awk
BEGINFILE {
	getline var
	getline
}

BEGIN {
        PROCINFO["sorted_in"]
	print
	nextfile
	delete a
	delete(a)
	y = /a/
	y == /a/
	/b/ ~ x
	length
	switch(s) {
	case 1:
	default:
	case 1:
	default:
	}
	break
	continue
	next
	a
	f(/pqr/)
	//
	/* */
}
END {
	getline
}
function zz(aa, aa)
{
	return aa
}
@include ""
BEGIN {
	print "foo" > "foo" 1	# should warn
	print "foo" > ("foo" 1)	# should not warn
	system("rm -f foo1 foo2")
}