Use LIFO in Destroying locale subsystem

I noticed this in code reading.  I don't know if it is currently a
problem, but at destruction time, the last created should be the first
destroyed, as nothing should be depending on it (since everything else
was created before it), but it and its destruction could be depending on
things created earlier.

1 files changed, 2 insertions, 2 deletions

diff --git a/perl.h b/perl.h
index cfdaacd162..791262dd3d 100644
--- a/perl.h
+++ b/perl.h
@@ -7247,9 +7247,9 @@ the plain locale pragma without a parameter (S<C<use locale>>) is in effect.
                                 } STMT_END
 
 #  define LOCALE_TERM           STMT_START {                                \
-                                    MUTEX_DESTROY(&PL_locale_mutex);        \
-                                    LOCALE_TERM_LC_NUMERIC_;                \
                                     LOCALE_TERM_POSIX_2008_;                \
+                                    LOCALE_TERM_LC_NUMERIC_;                \
+                                    MUTEX_DESTROY(&PL_locale_mutex);        \
                                 } STMT_END
 #endif