From: José Fonseca <jose.r.fonseca@gmail.com>
Date: Fri, 5 Oct 2012 19:55:28 +0000 (+0100)
Subject: Fix pickling of long integers.
X-Git-Url: https://git.cworth.org/git?a=commitdiff_plain;h=d64e5b2bcd7c7b84a87d3d25786216d1594ce0dd;p=apitrace

Fix pickling of long integers.

shifting more than the number of bits in the type yields undefined results.
---

diff --git a/common/pickle.hpp b/common/pickle.hpp
index 60694fa..41667e6 100644
--- a/common/pickle.hpp
+++ b/common/pickle.hpp
@@ -300,12 +300,15 @@ protected:
             return;
         }
 
-        unsigned c = 1;
         // Same as l >> (8 * sizeof l), but without the warnings
         T sign = l < 0 ? ~0 : 0;
-        while ((l >> (8 * c)) != sign) {
+
+        T sl = l;
+        unsigned c = 0;
+        do {
             ++c;
-        }
+        } while (sl >>= 8 != sign);
+
         // Add an extra byte if sign bit doesn't match
         if (((l >> (8 * c - 1)) & 1) != ((l >> (8 * sizeof l - 1)) & 1)) {
             ++c;