xref: /plan9/sys/src/cmd/dict/egfix (revision 219b2ee8daee37f4aad58d63f21287faa8e4ffdc)
1#!/bin/rc
2
3sed '
4	s/[ 	]+$//
5	/	/!d
6	/, /{; h; s/,.*//; p; g; s/	.*, /	/; }
7' $1 |
8sed '
9	/\(/{; h; s/\([^)]+\)//; p; g; s/[()]//g; }
10' |
11sed '
12	s/	 +/	/
13	s/[ 	]+$//
14	s/  +/ /g
15'
16