This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Re-order IVX slot in SV bodies
[perl5.git] / av.h
diff --git a/av.h b/av.h
index 486bc5c..f9721d9 100644 (file)
--- a/av.h
+++ b/av.h
@@ -1,7 +1,7 @@
 /*    av.h
  *
  *    Copyright (C) 1991, 1992, 1993, 1995, 1996, 1997, 1998, 1999,
- *    2000, 2001, 2002, by Larry Wall and others
+ *    2000, 2001, 2002, 2005, by Larry Wall and others
  *
  *    You may distribute under the terms of either the GNU General Public
  *    License or the Artistic License, as specified in the README file.
@@ -9,9 +9,9 @@
  */
 
 struct xpvav {
+    IV         this_space;
     SSize_t    xav_fill;       /* Index of last element present */
     SSize_t    xav_max;        /* max index for which array has space */
-    IV         this_space;
     union {
        NV      xnvu_nv;
        struct {
@@ -86,3 +86,13 @@ Same as C<av_len()>.  Deprecated, use C<av_len()> instead.
                          ? mg_size((SV *) av) : AvFILLp(av))
 
 #define NEGATIVE_INDICES_VAR "NEGATIVE_INDICES"
+
+/*
+ * Local variables:
+ * c-indentation-style: bsd
+ * c-basic-offset: 4
+ * indent-tabs-mode: t
+ * End:
+ *
+ * ex: set ts=8 sts=4 sw=4 noet:
+ */