[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
scratch/pkg 7fc79fae805 3/3: After-merge
From: |
Gerd Moellmann |
Subject: |
scratch/pkg 7fc79fae805 3/3: After-merge |
Date: |
Mon, 2 Oct 2023 04:11:25 -0400 (EDT) |
branch: scratch/pkg
commit 7fc79fae8058ad2bb570d05a0791f1dfc124545e
Author: Gerd Möllmann <gerd@gnu.org>
Commit: Gerd Möllmann <gerd@gnu.org>
After-merge
* src/alloc.c (cleanup_vector): Add PVEC_PACKAGE to switch.
(find_string_data_in_pure): #if 0
---
src/alloc.c | 4 ++++
1 file changed, 4 insertions(+)
diff --git a/src/alloc.c b/src/alloc.c
index 0e6b79fcdc5..0bd9ec4d706 100644
--- a/src/alloc.c
+++ b/src/alloc.c
@@ -3524,6 +3524,7 @@ cleanup_vector (struct Lisp_Vector *vector)
case PVEC_CHAR_TABLE:
case PVEC_SUB_CHAR_TABLE:
case PVEC_RECORD:
+ case PVEC_PACKAGE:
break;
}
}
@@ -5758,6 +5759,7 @@ check_pure_size (void)
pure_bytes_used + pure_bytes_used_before_overflow);
}
+#if 0
/* Find the byte sequence {DATA[0], ..., DATA[NBYTES-1], '\0'} from
the non-Lisp data pool of the pure storage, and return its start
address. Return NULL if not found. */
@@ -5839,6 +5841,8 @@ find_string_data_in_pure (const char *data, ptrdiff_t
nbytes)
return NULL;
}
+#endif // 0
+
/* Return a string allocated in pure space. DATA is a buffer holding
NCHARS characters, and NBYTES bytes of string data. MULTIBYTE