Remove @extvars from embed.pl

It's been unused since PERL_POLLUTE was removed in cfef31b27d1a56cd.

1 files changed, 0 insertions, 23 deletions

diff --git a/embed.pl b/embed.pl
index 386b34d6fe..22d8780f9a 100755
--- a/embed.pl
+++ b/embed.pl
@@ -16,8 +16,6 @@
 #    perlvars.h
 #    pp.sym     (which has been generated by opcode.pl)
 #
-# plus from the values hardcoded into this script in @extvars.
-#
 # Accepts the standard regen_lib -q and -v args.
 #
 # This script is normally invoked from regen.pl.
@@ -293,27 +291,6 @@ walk_table(\&write_protos,     "proto.h", "/* ex: set ro: */\n");
 warn "$unflagged_pointers pointer arguments to clean up\n" if $unflagged_pointers;
 walk_table(\&write_global_sym, "global.sym", "# ex: set ro:\n");
 
-# XXX others that may need adding
-#       warnhook
-#       hints
-#       copline
-my @extvars = qw(sv_undef sv_yes sv_no na dowarn
-		 curcop compiling
-		 tainting tainted stack_base stack_sp sv_arenaroot
-		 no_modify
-		 curstash DBsub DBsingle DBassertion debstash
-		 rsfp
-		 stdingv
-		 defgv
-		 errgv
-		 rsfp_filters
-		 perldb
-		 diehook
-		 dirty
-		 perl_destruct_level
-		 ppaddr
-                );
-
 sub readsyms (\%$) {
     my ($syms, $file) = @_;
     local (*FILE, $_);