This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Shuffling PL_gensym saves 8 bytes on LP64 systems.
authorNicholas Clark <nick@ccl4.org>
Sat, 5 May 2007 13:26:28 +0000 (13:26 +0000)
committerNicholas Clark <nick@ccl4.org>
Sat, 5 May 2007 13:26:28 +0000 (13:26 +0000)
p4raw-id: //depot/perl@31152

intrpvar.h

index b2749d1..02fc97e 100644 (file)
@@ -179,8 +179,6 @@ PERLVAR(Ieval_start,        OP *)
 /* runtime control stuff */
 PERLVARI(Icurcopdb,    COP *,  NULL)
 
-/* statics moved here for shared library purposes */
-PERLVARI(Igensym,      I32,    0)      /* next symbol for getsym() to define */
 PERLVAR(Ifilemode,     int)            /* so nextargv() can preserve mode */
 PERLVAR(Ilastfd,       int)            /* what to preserve mode on */
 PERLVAR(Ioldname,      char *)         /* what to preserve mode on */
@@ -189,6 +187,8 @@ PERLVAR(ICmd,               char *)         /* stuff to free from do_aexec, vfork safe */
 PERLVAR(Ipreambleav,   AV *)
 PERLVAR(Imess_sv,      SV *)
 PERLVAR(Iors_sv,       SV *)           /* output record separator $\ */
+/* statics moved here for shared library purposes */
+PERLVARI(Igensym,      I32,    0)      /* next symbol for getsym() to define */
 PERLVAR(Iin_my,                U16)            /* we're compiling a "my" (or "our") declaration */
 PERLVARI(Ilaststype,   U16,    OP_STAT)
 PERLVARI(Ilaststatval, int,    -1)