From 82f13f83760b047a72a199ea262265b3f4d2ec04 Mon Sep 17 00:00:00 2001 From: Paul Eggert Date: Wed, 31 Jul 2019 10:40:44 -0700 Subject: [PATCH] Avoid intern calls for builtin syms * src/casefiddle.c (Fdowncase_region): * src/eval.c (Fdefvaralias): Use builtin symbol rather than calling intern. --- src/casefiddle.c | 2 +- src/eval.c | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/src/casefiddle.c b/src/casefiddle.c index 3f407eadede..ee292dda9b3 100644 --- a/src/casefiddle.c +++ b/src/casefiddle.c @@ -529,7 +529,7 @@ See also `capitalize-region'. */) if (!NILP (region_noncontiguous_p)) { - bounds = call1 (Fsymbol_value (intern ("region-extract-function")), + bounds = call1 (Fsymbol_value (Qregion_extract_function), intern ("bounds")); while (CONSP (bounds)) diff --git a/src/eval.c b/src/eval.c index b890aa6f7f2..2e5074360d5 100644 --- a/src/eval.c +++ b/src/eval.c @@ -625,7 +625,7 @@ The return value is BASE-VARIABLE. */) && !EQ (find_symbol_value (new_alias), find_symbol_value (base_variable))) call2 (intern ("display-warning"), - list3 (intern ("defvaralias"), intern ("losing-value"), new_alias), + list3 (Qdefvaralias, intern ("losing-value"), new_alias), CALLN (Fformat_message, build_string ("Overwriting value of `%s' by aliasing to `%s'"), -- 2.39.2