Don't print a trailing comma for the last entry in enum def_tupple

This commit is contained in:
Todd C. Miller
2004-11-29 17:34:09 +00:00
parent 9c88441420
commit 51fbe264f1
2 changed files with 4 additions and 3 deletions

View File

@@ -124,5 +124,5 @@ enum def_tupple {
once, once,
always, always,
any, any,
all, all
}; };

View File

@@ -109,8 +109,9 @@ print CFILE "\tNULL, 0, NULL\n }\n};\n";
# Print out def_tuple # Print out def_tuple
if (@tuple_values) { if (@tuple_values) {
print HEADER "\nenum def_tupple {\n"; print HEADER "\nenum def_tupple {\n";
foreach (@tuple_values) { for ($i = 0; $i <= $#tuple_values; $i++) {
print HEADER "\t$_,\n"; printf HEADER "\t%s%s\n", $tuple_values[$i],
$i != $#tuple_values ? "," : "";
} }
print HEADER "};\n"; print HEADER "};\n";
} }