emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] master 82f13f8 2/2: Avoid intern calls for builtin syms


From: Paul Eggert
Subject: [Emacs-diffs] master 82f13f8 2/2: Avoid intern calls for builtin syms
Date: Wed, 31 Jul 2019 13:41:29 -0400 (EDT)

branch: master
commit 82f13f83760b047a72a199ea262265b3f4d2ec04
Author: Paul Eggert <address@hidden>
Commit: Paul Eggert <address@hidden>

    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 3f407ea..ee292dd 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 b890aa6..2e50743 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'"),



reply via email to

[Prev in Thread] Current Thread [Next in Thread]