From 7dc76173083a2f3a487b7104bbef4fd6704274bc Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Gerd=20M=C3=B6llmann?= <gerd@gnu.org>
Date: Thu, 18 Apr 2024 20:46:25 +0200
Subject: [PATCH] Comment out an expensive assertion

---
 src/igc.c | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/src/igc.c b/src/igc.c
index 13ea2194a76..cc4dd61c238 100644
--- a/src/igc.c
+++ b/src/igc.c
@@ -2352,7 +2352,8 @@ igc_hash (Lisp_Object key)
 
   if (is_mps (client))
     {
-      igc_assert (mps_arena_has_addr (global_igc->arena, client));
+      // The following assertion is very expensive.
+      // igc_assert (mps_arena_has_addr (global_igc->arena, client));
       struct igc_header *h = client_to_base (client);
       return h->hash;
     }