From: Nicholas Clark <nick@ccl4.org>
Date: Sun, 12 Jun 2011 07:27:06 +0000 (+0200)
Subject: Shrink struct am_table.
X-Git-Tag: accepted/trunk/20130322.191538~3776
X-Git-Url: http://review.tizen.org/git/?a=commitdiff_plain;h=8978b4ac1f6bf2c1c69a99d1d1db68ebdfcac193;p=platform%2Fupstream%2Fperl.git

Shrink struct am_table.

Two members, flags and fallback, were using integer types considerably larger
than the range of values that they needed to store.
---

diff --git a/perl.h b/perl.h
index 8963f50..fceb220 100644
--- a/perl.h
+++ b/perl.h
@@ -5037,14 +5037,17 @@ EXTCONST U8 PL_magic_data[256];
 END_EXTERN_C
 
 struct am_table {
-  U32 flags;
+  U8 flags;
+  U8 fallback;
+  U16 spare;
   U32 was_ok_sub;
   long was_ok_am;
-  long fallback;
   CV* table[NofAMmeth];
 };
 struct am_table_short {
-  U32 flags;
+  U8 flags;
+  U8 fallback;
+  U16 spare;
   U32 was_ok_sub;
   long was_ok_am;
 };