From: Andrea Corallo <andrea_corallo@yahoo.it>
Date: Thu, 22 Aug 2019 09:40:41 +0000 (+0200)
Subject: some renaming
X-Git-Tag: emacs-28.0.90~2727^2~1248
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=cf0053a66a8055e05e9842c41f60c2130f4dd642;p=emacs.git

some renaming
---

diff --git a/src/comp.c b/src/comp.c
index 3491d5127d6..5c8106a78e4 100644
--- a/src/comp.c
+++ b/src/comp.c
@@ -156,7 +156,6 @@ static comp_t comp;
 
 FILE *logfile = NULL;
 
-
 
 Lisp_Object helper_save_window_excursion (Lisp_Object v1);
 
@@ -294,10 +293,10 @@ declare_imported_func (Lisp_Object subr_sym, gcc_jit_type *ret_type,
   gcc_jit_type *type[nargs];
   fill_declaration_types (type, args, nargs);
 
-  /* String containing the function ptr. */
-  Lisp_Object f_ptr_name = CALLN (Ffuncall, intern_c_string (STR (comp-c-func-name)),
-				  subr_sym, make_string("R", 1));
-
+  /* String containing the function ptr name. */
+  Lisp_Object f_ptr_name
+    = CALLN (Ffuncall, intern_c_string (STR (comp-c-func-name)),
+	     subr_sym, make_string("R", 1));
 
   gcc_jit_type *f_ptr_type
     = gcc_jit_context_new_function_ptr_type (comp.ctxt,
@@ -317,7 +316,7 @@ declare_imported_func (Lisp_Object subr_sym, gcc_jit_type *ret_type,
 }
 
 static gcc_jit_function *
-declare_func_exported (const char *f_name, gcc_jit_type *ret_type,
+declare_exported_func (const char *f_name, gcc_jit_type *ret_type,
 		       unsigned nargs, gcc_jit_rvalue **args)
 {
   gcc_jit_type *type[nargs];
@@ -2412,7 +2411,7 @@ compile_function (Lisp_Object func)
     {
       EMACS_INT max_args = XFIXNUM (FUNCALL1 (comp-args-max, args));
       comp.func
-	= declare_func_exported (c_name, comp.lisp_obj_type, max_args, NULL);
+	= declare_exported_func (c_name, comp.lisp_obj_type, max_args, NULL);
     }
   else
     {