xref: /freebsd/contrib/one-true-awk/testdir/lilly.progs (revision d0b2dbfa0ecf2bbc9709efc5e20baf8e4b44bbbf)
1BEGIN{foo=6;print foo/2}
2BEGIN{foo=10;foo/=2;print foo}
3/=/ {print $0}
4/==/ {print $0}
5/\+=/ {print $0}
6/\*=/ {print $0}
7/-=/ {print $0}
8/\/=/ {print $0}
9/%=/ {print $0}
10/^=/ {print $0}
11/!=/ {print $0}
12/<=/ {print $0}
13/>=/ {print $0}
14!/=/ {print $0}
15!/==/ {print $0}
16!/\+=/ {print $0}
17!/\*=/ {print $0}
18!/-=/ {print $0}
19!/\/=/ {print $0}
20!/%=/ {print $0}
21!/^=/ {print $0}
22!/!=/ {print $0}
23!/<=/ {print $0}
24!/>=/ {print $0}
25$0~/=/ {print $0}
26$0~/==/ {print $0}
27$0~/\+=/ {print $0}
28$0~/\*=/ {print $0}
29$0~/-=/ {print $0}
30$0~/\/=/ {print $0}
31$0~/%=/ {print $0}
32$0~/^=/ {print $0}
33$0~/!=/ {print $0}
34$0~/<=/ {print $0}
35$0~/>=/ {print $0}
36$0!~/=/ {print $0}
37$0!~/==/ {print $0}
38$0!~/\+=/ {print $0}
39$0!~/\*=/ {print $0}
40$0!~/-=/ {print $0}
41$0!~/%=/ {print $0}
42$0!~/^=/ {print $0}
43$0!~/!=/ {print $0}
44$0!~/<=/ {print $0}
45$0!~/>=/ {print $0}
46{if(match($0,/=/))print $0}
47{if(match($0,/\=/))print $0}
48{if(match($0,/==/))print $0}
49{if(match($0,/\+=/))print $0}
50{if(match($0,/\*=/))print $0}
51{if(match($0,/-=/))print $0}
52{if(match($0,/%=/))print $0}
53{if(match($0,/^=/))print $0}
54{if(match($0,/!=/))print $0}
55{if(match($0,/<=/))print $0}
56{if(match($0,/>=/))print $0}
57{if(!match($0,/=/))print $0}
58{if(!match($0,/==/))print $0}
59{if(!match($0,/\+=/))print $0}
60{if(!match($0,/\*=/))print $0}
61{if(!match($0,/-=/))print $0}
62{if(!match($0,/%=/))print $0}
63{if(!match($0,/^=/))print $0}
64{if(!match($0,/!=/))print $0}
65{if(!match($0,/<=/))print $0}
66{if(!match($0,/>=/))print $0}
67{if(split($0,foo,/=/))print $0}
68{if(split($0,foo,/\=/))print $0}
69{if(split($0,foo,/==/))print $0}
70{if(split($0,foo,/\+=/))print $0}
71{if(split($0,foo,/\*=/))print $0}
72{if(split($0,foo,/-=/))print $0}
73{if(split($0,foo,/\/=/))print $0}
74{if(split($0,foo,/%=/))print $0}
75{if(split($0,foo,/^=/))print $0}
76{if(split($0,foo,/!=/))print $0}
77{if(split($0,foo,/<=/))print $0}
78{if(split($0,foo,/>=/))print $0}
79{if(sub(/=/,"#"))print $0}
80{if(sub(/\=/,"#"))print $0}
81{if(sub(/==/,"#"))print $0}
82{if(sub(/\+=/,"#"))print $0}
83{if(sub(/\*=/,"#"))print $0}
84{if(sub(/-=/,"#"))print $0}
85{if(sub(/\/=/,"#"))print $0}
86{if(sub(/%=/,"#"))print $0}
87{if(sub(/^=/,"#"))print $0}
88{if(sub(/!=/,"#"))print $0}
89{if(sub(/<=/,"#"))print $0}
90{if(sub(/>=/,"#"))print $0}
91{if(gsub(/=/,"#"))print $0}
92{if(gsub(/\=/,"#"))print $0}
93{if(gsub(/==/,"#"))print $0}
94{if(gsub(/\+=/,"#"))print $0}
95{if(gsub(/\*=/,"#"))print $0}
96{if(gsub(/-=/,"#"))print $0}
97{if(gsub(/\/=/,"#"))print $0}
98{if(gsub(/%=/,"#"))print $0}
99{if(gsub(/^=/,"#"))print $0}
100{if(gsub(/!=/,"#"))print $0}
101{if(gsub(/<=/,"#"))print $0}
102{if(gsub(/>=/,"#"))print $0}
103{if(sub(/=/,"#",$0))print $0}
104{if(sub(/\=/,"#",$0))print $0}
105{if(sub(/==/,"#",$0))print $0}
106{if(sub(/\+=/,"#",$0))print $0}
107{if(sub(/\*=/,"#",$0))print $0}
108{if(sub(/-=/,"#",$0))print $0}
109{if(sub(/\/=/,"#",$0))print $0}
110{if(sub(/%=/,"#",$0))print $0}
111{if(sub(/^=/,"#",$0))print $0}
112{if(sub(/!=/,"#",$0))print $0}
113{if(sub(/<=/,"#",$0))print $0}
114{if(sub(/>=/,"#",$0))print $0}
115{if(sub(/=/,"#",$0))print $0}
116{if(gsub(/\=/,"#",$0))print $0}
117{if(gsub(/==/,"#",$0))print $0}
118{if(gsub(/\+=/,"#",$0))print $0}
119{if(gsub(/\*=/,"#",$0))print $0}
120{if(gsub(/-=/,"#",$0))print $0}
121{if(gsub(/\/=/,"#",$0))print $0}
122{if(gsub(/%=/,"#",$0))print $0}
123{if(gsub(/^=/,"#",$0))print $0}
124{if(gsub(/!=/,"#",$0))print $0}
125{if(gsub(/<=/,"#",$0))print $0}
126{if(gsub(/>=/,"#",$0))print $0}
127