try#2: [proposed PATCH Perl@12401] ieee floats, rand() & old systems

[perl5.git] / embedvar.h

diff --git a/embedvar.h b/embedvar.h
index 92e9e91..26c0eb1 100644 (file)
--- a/embedvar.h
+++ b/embedvar.h
@@ -68,7 +68,6 @@
 #define PL_maxscream           (vTHX->Tmaxscream)
 #define PL_modcount            (vTHX->Tmodcount)
 #define PL_na                  (vTHX->Tna)
-#define PL_nrs                 (vTHX->Tnrs)
 #define PL_ofs_sv              (vTHX->Tofs_sv)
 #define PL_op                  (vTHX->Top)
 #define PL_opsave              (vTHX->Topsave)
@@ -162,6 +161,7 @@
 #define PL_tmps_stack          (vTHX->Ttmps_stack)
 #define PL_top_env             (vTHX->Ttop_env)
 #define PL_toptarget           (vTHX->Ttoptarget)
+#define PL_unused_1            (vTHX->Tunused_1)
 #define PL_watchaddr           (vTHX->Twatchaddr)
 #define PL_watchok             (vTHX->Twatchok)
 
@@ -1074,7 +1074,6 @@
 #define PL_maxscream           (aTHX->Tmaxscream)
 #define PL_modcount            (aTHX->Tmodcount)
 #define PL_na                  (aTHX->Tna)
-#define PL_nrs                 (aTHX->Tnrs)
 #define PL_ofs_sv              (aTHX->Tofs_sv)
 #define PL_op                  (aTHX->Top)
 #define PL_opsave              (aTHX->Topsave)
@@ -1168,6 +1167,7 @@
 #define PL_tmps_stack          (aTHX->Ttmps_stack)
 #define PL_top_env             (aTHX->Ttop_env)
 #define PL_toptarget           (aTHX->Ttoptarget)
+#define PL_unused_1            (aTHX->Tunused_1)
 #define PL_watchaddr           (aTHX->Twatchaddr)
 #define PL_watchok             (aTHX->Twatchok)
 
@@ -1213,7 +1213,6 @@
 #define PL_Tmaxscream          PL_maxscream
 #define PL_Tmodcount           PL_modcount
 #define PL_Tna                 PL_na
-#define PL_Tnrs                        PL_nrs
 #define PL_Tofs_sv             PL_ofs_sv
 #define PL_Top                 PL_op
 #define PL_Topsave             PL_opsave
@@ -1307,6 +1306,7 @@
 #define PL_Ttmps_stack         PL_tmps_stack
 #define PL_Ttop_env            PL_top_env
 #define PL_Ttoptarget          PL_toptarget
+#define PL_Tunused_1           PL_unused_1
 #define PL_Twatchaddr          PL_watchaddr
 #define PL_Twatchok            PL_watchok
 
@@ -1321,8 +1321,11 @@
 #define PL_do_undump           (PL_Vars.Gdo_undump)
 #define PL_hexdigit            (PL_Vars.Ghexdigit)
 #define PL_malloc_mutex                (PL_Vars.Gmalloc_mutex)
+#define PL_my_inv_rand_max     (PL_Vars.Gmy_inv_rand_max)
 #define PL_op_mutex            (PL_Vars.Gop_mutex)
 #define PL_patleave            (PL_Vars.Gpatleave)
+#define PL_sharedsv_space      (PL_Vars.Gsharedsv_space)
+#define PL_sharedsv_space_mutex        (PL_Vars.Gsharedsv_space_mutex)
 #define PL_thr_key             (PL_Vars.Gthr_key)
 
 #else /* !PERL_GLOBAL_STRUCT */
@@ -1333,8 +1336,11 @@
 #define PL_Gdo_undump          PL_do_undump
 #define PL_Ghexdigit           PL_hexdigit
 #define PL_Gmalloc_mutex       PL_malloc_mutex
+#define PL_Gmy_inv_rand_max    PL_my_inv_rand_max
 #define PL_Gop_mutex           PL_op_mutex
 #define PL_Gpatleave           PL_patleave
+#define PL_Gsharedsv_space     PL_sharedsv_space
+#define PL_Gsharedsv_space_mutex       PL_sharedsv_space_mutex
 #define PL_Gthr_key            PL_thr_key
 
 #endif /* PERL_GLOBAL_STRUCT */