scc

simple C compiler
git clone git://git.2f30.org/scc
Log | Files | Refs | README | LICENSE

generror.awk (323B)

      1 /^enum nerrors \{/     {print "char *errlist[] = {"; inhome = 1}
      2 
      3 inhome && /E[A-Z]*, /  {sub(/,/, "", $1)
      4                         printf("\t[%s] = \"", $1)
      5                         for (i = 3; i <= NF-1; ++i)
      6 				printf("%s%s", $i, (i == NF-1) ? "\"" : " ")
      7 			print ","}
      8 
      9 inhome && /^}/          {print "};" ; inhome = 0}