aboutsummaryrefslogtreecommitdiff
path: root/src/cmd/dict/egfix
blob: 192320c2a018f853918029d1468218a8e605139e (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
#!/bin/rc

sed '
	s/[ 	]+$//
	/	/!d
	/, /{; h; s/,.*//; p; g; s/	.*, /	/; }
' $1 |
sed '
	/\(/{; h; s/\([^)]+\)//; p; g; s/[()]//g; }
' |
sed '
	s/	 +/	/
	s/[ 	]+$//
	s/  +/ /g
'