OLD | NEW |
| (Empty) |
1 {print $0} | |
2 b=$0 | |
3 /f[1-9]?f[1-9]?i/ {gsub("f[1-9]?f[1-9]?i", "ffi",b) } | |
4 /f[1-9]?f[1-9]?l/ {gsub("f[1-9]?f[1-9]?l", "ffl",b) } | |
5 | |
6 /f[1-9]?f/ {gsub("f[1-9]?f", "ff",b); r=1} | |
7 /f[1-9]?i/ {gsub("f[1-9]?i", "fi",b); r=1} | |
8 /f[1-9]?l/ {gsub("f[1-9]?l", "fl",b); r=1} | |
9 | |
10 b!=$0 { | |
11 # check alternative hyph | |
12 if (num ~ /\//) { | |
13 next; | |
14 } | |
15 print b | |
16 } | |
17 | |
18 c=b | |
19 | |
20 /^[1-9]?f/ { sub("^[1-9]?f", "ff", c); } | |
21 /^[1-9]?i/ { sub("^[1-9]?i", "fi", c); } | |
22 /^[1-9]?l/ { sub("^[1-9]?l", "fl", c); } | |
23 | |
24 c!=b { print c } | |
25 | |
26 /f[1-9]?$/ { | |
27 print gensub("f[1-9]?$", "ff", "g", b); | |
28 if (c!=b) print gensub("f[1-9]?$", "ff", "g", c); | |
29 | |
30 print gensub("f[1-9]?$", "fi", "g", b); | |
31 if (c!=b) print gensub("f[1-9]?$", "fi", "g", c); | |
32 | |
33 print gensub("f[1-9]?$", "fl", "g", b); | |
34 if (c!=b) print gensub("f[1-9]?$", "fl", "g", c); | |
35 } | |
36 | |
37 | |
38 #s/ffi/ffi/g | |
39 #s/ffl/ffl/g | |
40 #s/ff/ff/g | |
41 #s/fi/fi/g | |
42 #s/fl/fl/g | |
OLD | NEW |