From a80d0d23826293a791ba3aea6b89493275b50665 Mon Sep 17 00:00:00 2001 From: Pip Cet Date: Mon, 5 Aug 2024 21:46:58 +0000 Subject: [PATCH] * src/search.c (Fre__describe_compiled): Use 'CHECK_STRING'. (cherry picked from commit ca258e81b81539dc20a06958f911fc5dcd3df922) --- 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) -- 2.39.2