[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master ca258e81b81 1/3: * src/search.c (Fre__describe_compiled): Use 'CH
|
From: |
Pip Cet |
|
Subject: |
master ca258e81b81 1/3: * src/search.c (Fre__describe_compiled): Use 'CHECK_STRING'. |
|
Date: |
Mon, 5 Aug 2024 18:08:55 -0400 (EDT) |
branch: master
commit ca258e81b81539dc20a06958f911fc5dcd3df922
Author: Pip Cet <pipcet@protonmail.com>
Commit: Pip Cet <pipcet@protonmail.com>
* src/search.c (Fre__describe_compiled): Use 'CHECK_STRING'.
---
src/search.c | 1 +
1 file changed, 1 insertion(+)
diff --git a/src/search.c b/src/search.c
index 2ff8b0599c4..087b99d87f3 100644
--- a/src/search.c
+++ b/src/search.c
@@ -3405,6 +3405,7 @@ DEFUN ("re--describe-compiled", Fre__describe_compiled,
Sre__describe_compiled,
If RAW is non-nil, just return the actual bytecode. */)
(Lisp_Object regexp, Lisp_Object raw)
{
+ CHECK_STRING (regexp);
struct regexp_cache *cache_entry
= compile_pattern (regexp, NULL,
(!NILP (Vcase_fold_search)