Fix building with -Accflags=-DDL_UNLOAD_ALL_AT_EXIT

Commit bb6a367ad5d replaced an XPUSHs inside a loop with an EXTEND
outside it, but didn't move the dSP to match.  Even if it did, that
would have been wrong, since the loop might push more than one value.
Revert that bit of the commit.

In passing, move the declaration of dl_librefs and dl_libref into the
scope where they're used.

1 files changed, 3 insertions, 6 deletions

diff --git a/ext/DynaLoader/dlutils.c b/ext/DynaLoader/dlutils.c
index 557c0ec1db..ad5dd26aba 100644
--- a/ext/DynaLoader/dlutils.c
+++ b/ext/DynaLoader/dlutils.c
@@ -75,18 +75,15 @@ static void
 dl_unload_all_files(pTHX_ void *unused)
 {
     CV *sub;
-    AV *dl_librefs;
-    SV *dl_libref;
-
     if ((sub = get_cvs("DynaLoader::dl_unload_file", 0)) != NULL) {
-        dl_librefs = get_av("DynaLoader::dl_librefs", 0);
-        EXTEND(SP,1);
+        AV *dl_librefs = get_av("DynaLoader::dl_librefs", 0);
+        SV *dl_libref;
         while ((dl_libref = av_pop(dl_librefs)) != &PL_sv_undef) {
            dSP;
            ENTER;
            SAVETMPS;
            PUSHMARK(SP);
-           PUSHs(sv_2mortal(dl_libref));
+           XPUSHs(sv_2mortal(dl_libref));
            PUTBACK;
            call_sv((SV*)sub, G_DISCARD | G_NODEBUG);
            FREETMPS;