shithub: scc

Info  •  Files  •  Log  •  Branches

Simplify generror script

awk allows expressions in the patterns.

--- a/cc2/generror

+++ b/cc2/generror

@@ -6,18 +6,15 @@

 /^enum nerrors {/ {

 	inhome = 1

 }

-/E[A-Z]*, / {

-	if (inhome == 1) {

-		sub(/,/, "", $1)

-		printf("\t[%s] = \"", $1)

-		for (i = 3; i < NF-1; ++i)

-			printf("%s ", $i)

-		printf("%s\",\n", $(NF-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));

 }

-/^}/ {

-	if (inhome)

-		print "};"

+inhome && /^}/ {

+	print "};"

 	inhome = 0

 }

-- 

⑨