| 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 |