This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
One definite grammar fix, and one sort-of-grammar fix. (It felt better)
[perl5.git] / perl.h
diff --git a/perl.h b/perl.h
index d81bc10..e26e475 100644 (file)
--- a/perl.h
+++ b/perl.h
@@ -4619,6 +4619,10 @@ typedef struct exitlistentry {
 #  define  FAKE_DEFAULT_SIGNAL_HANDLERS
 #endif
 
+#define PERL_PATCHLEVEL_H_IMPLICIT
+#include "patchlevel.h"
+#undef PERL_PATCHLEVEL_H_IMPLICIT
+
 #ifdef PERL_GLOBAL_STRUCT
 struct perl_vars {
 #  include "perlvars.h"
@@ -5839,11 +5843,6 @@ extern void moncontrol(int);
 #define NO_ENV_ARRAY_IN_MAIN
 #endif
 
-/* and finally... */
-#define PERL_PATCHLEVEL_H_IMPLICIT
-#include "patchlevel.h"
-#undef PERL_PATCHLEVEL_H_IMPLICIT
-
 /* These are used by Perl_pv_escape() and Perl_pv_pretty() 
  * are here so that they are available throughout the core 
  * NOTE that even though some are for _escape and some for _pretty
@@ -5924,4 +5923,3 @@ extern void moncontrol(int);
 */
 
 #endif /* Include guard */
-