[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
scratch/igc 1c54a7fe593 2/3: fix_obarray
From: |
Gerd Moellmann |
Subject: |
scratch/igc 1c54a7fe593 2/3: fix_obarray |
Date: |
Thu, 18 Apr 2024 10:33:11 -0400 (EDT) |
branch: scratch/igc
commit 1c54a7fe5938dcefbcfe6268728e75306c530aaa
Author: Gerd Möllmann <gerd@gnu.org>
Commit: Gerd Möllmann <gerd@gnu.org>
fix_obarray
---
src/igc.c | 3 +--
1 file changed, 1 insertion(+), 2 deletions(-)
diff --git a/src/igc.c b/src/igc.c
index 48aa6dad9aa..a844326fd56 100644
--- a/src/igc.c
+++ b/src/igc.c
@@ -1424,8 +1424,7 @@ fix_obarray (mps_ss_t ss, struct Lisp_Obarray *o)
{
MPS_SCAN_BEGIN (ss)
{
- IGC_FIX_CALL_FN (ss, struct Lisp_Vector, o, fix_vectorlike);
- igc_assert (!"obarray");
+ IGC_FIX12_NOBJS (ss, o->buckets, obarray_size (o));
}
MPS_SCAN_END (ss);
return MPS_RES_OK;