+ $pa_vars .= " const void *v_$n= 0;\n";
+ $paarg= "&v_$n";
+ $pafin= "\n a_$n= v_$n; ";
+ $a =~ m/\,/ or die "invalid enum type \`$a'\n";
+ $a_tab = lc($`).'s';
+ $a = "$a_tab, sizeof($`), $'";
+ o('h', 210, "extern const $` $a_tab".'[]'.";\n");
+ }
+ if (exists $type_fini{$t}) {
+ $pa_fini .= ' '.subst_in("a_$n", $type_fini{$t})."\n";