In embed.pl, remove unused parameter $keep_pre from readvars().

$keep_pre was added by commit c6af7a1aaf1f569e in 1998, and the last user
removed by commit 51371543ca1a75ed in 1999.

diff --git a/regen/embed.pl b/regen/embed.pl
index dac4d45..20bb177 100755 (executable)
--- a/regen/embed.pl
+++ b/regen/embed.pl
@@ -360,8 +360,8 @@ EOF
 warn "$unflagged_pointers pointer arguments to clean up\n" if $unflagged_pointers;
 walk_table(\&write_global_sym, "global.sym");
 
-sub readvars(\%$$@) {
-    my ($syms, $file,$pre,$keep_pre) = @_;
+sub readvars(\%$$) {
+    my ($syms, $file, $pre) = @_;
     local (*FILE, $_);
     open(FILE, "< $file")
        or die "embed.pl: Can't open $file: $!\n";
@@ -369,7 +369,6 @@ sub readvars(\%$$@) {
        s/[ \t]*#.*//;          # Delete comments.
        if (/PERLVARA?I?C?\($pre(\w+)/) {
            my $sym = $1;
-           $sym = $pre . $sym if $keep_pre;
            warn "duplicate symbol $sym while processing $file line $.\n"
                if exists $$syms{$sym};
            $$syms{$sym} = $pre || 1;