harvey/sys/lib/troff/font/devutf/mkMAP

#!/bin/rc
grep '	' $* | awk '
$2 != "\"" {last = $4}
{printf("\t%s\t%s\n", $1, last)}
'