From abec89a558d952dc1f4f39bda6a8e69a426a8dc0 Mon Sep 17 00:00:00 2001
From: Xavier Leroy <xavier.leroy@inria.fr>
Date: Mon, 24 Oct 2016 14:29:59 +0200
Subject: cparser/PackedStructs: fix assertion that was wrong for 64-bit
 targets

---
 cparser/PackedStructs.ml | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'cparser/PackedStructs.ml')

diff --git a/cparser/PackedStructs.ml b/cparser/PackedStructs.ml
index fd6bd936..b74a29d4 100644
--- a/cparser/PackedStructs.ml
+++ b/cparser/PackedStructs.ml
@@ -182,7 +182,7 @@ let bswap_write loc env lhs rhs =
   let ty = lhs.etyp in
   let (bsize, aty) =
     accessor_type loc env ty in
-  assert (bsize = 16 || bsize = 32);
+  assert (bsize = 16 || bsize = 32 || (bsize = 64 && !config.sizeof_ptr = 8));
   try
     if !use_reversed then begin
       let (id, fty) =
-- 
cgit