shithub: scc

ref: 50c78edf22ceb0a91da49921f16d65baef94cdac
dir: /cc2/generror/

View raw version 
#!/usr/bin/env awk -f

BEGIN {
	print "char *errlist[] = {"
}
/^enum nerrors \{/ {
	inhome = 1
}
inhome && /E[A-Z]*, / {
	sub(/,/, "", $1)
	printf("\t[%s] = \"", $1)
	for (i = 3; i < NF-1; ++i)
		printf("%s ", $i)
	printf("%s\",\n", $(NF-1));
}
inhome && /^}/ {
	print "};"
	inhome = 0
}