shithub: scc

ref: 61d8ab34d1ccd7ffdc3fd0e3fe73bf1a87bf0af6
dir: /src/cmd/cc/cc2/generror.awk/

View raw version 
/^enum nerrors \{/     {print "char *errlist[] = {"; inhome = 1}

inhome && /E[A-Z]*, /  {sub(/,/, "", $1)
                        printf("\t[%s] = \"", $1)
                        for (i = 3; i <= NF-1; ++i)
				printf("%s%s", $i, (i == NF-1) ? "\"" : " ")
			print ","}

inhome && /^}/          {print "};" ; inhome = 0}