This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
pp_crypt(): reindent CPP directives
[perl5.git] / embedvar.h
index 04c2d6b..63a741e 100644 (file)
@@ -88,7 +88,6 @@
 #define PL_body_roots          (vTHX->Ibody_roots)
 #define PL_bodytarget          (vTHX->Ibodytarget)
 #define PL_breakable_sub_gen   (vTHX->Ibreakable_sub_gen)
-#define PL_check               (vTHX->Icheck)
 #define PL_checkav             (vTHX->Icheckav)
 #define PL_checkav_save                (vTHX->Icheckav_save)
 #define PL_chopset             (vTHX->Ichopset)
 #define PL_GC_locale_obj       (my_vars->GC_locale_obj)
 #define PL_appctx              (my_vars->Gappctx)
 #define PL_Gappctx             (my_vars->Gappctx)
+#define PL_check               (my_vars->Gcheck)
+#define PL_Gcheck              (my_vars->Gcheck)
 #define PL_check_mutex         (my_vars->Gcheck_mutex)
 #define PL_Gcheck_mutex                (my_vars->Gcheck_mutex)
 #define PL_csighandler1p       (my_vars->Gcsighandler1p)