shithub: scc

ref: d47a56d8314f1c3d7e98c26fb6d132038faeb0b2
dir: /cc2/generror.awk/

View raw version 
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}