]> git.eshelyaron.com Git - emacs.git/commitdiff
; Rename 'startup--require-comp-safetly'
authorEli Zaretskii <eliz@gnu.org>
Fri, 28 Jan 2022 07:37:28 +0000 (09:37 +0200)
committerEli Zaretskii <eliz@gnu.org>
Fri, 28 Jan 2022 07:37:28 +0000 (09:37 +0200)
* src/comp.c (maybe_defer_native_compilation):
* lisp/startup.el (startup--require-comp-safely): Rename from
'startup--require-comp-safetly'.  All callers changed.

lisp/startup.el
src/comp.c

index f4216f7c4cbccb540d345fea641131865418f7ed..60aaa76002fa2e9881f83e9fb6abe2f5b9f12d01 100644 (file)
@@ -521,7 +521,7 @@ DIRS are relative."
 
 (defvar comp--loadable)
 (defvar comp--delayed-sources)
-(defun startup--require-comp-safetly ()
+(defun startup--require-comp-safely ()
   "Require the native compiler avoiding circular dependencies."
   (unless (featurep 'comp)
     ;; Require comp with `comp--loadable' set to nil to break
@@ -537,7 +537,7 @@ DIRS are relative."
   "Honor pending delayed deferred native compilations."
   (when (and (native-comp-available-p)
              comp--delayed-sources)
-    (startup--require-comp-safetly))
+    (startup--require-comp-safely))
   (setq comp--loadable t))
 
 (defvar native-comp-eln-load-path)
index 66288988fd8fe4b7248967eb23159465d2670265..56e583eb5c8f5e82468c0f00e35667f6e5269758 100644 (file)
@@ -5132,7 +5132,7 @@ maybe_defer_native_compilation (Lisp_Object function_name,
   if (comp__loadable)
     {
       /* Startup is done, comp is usable.  */
-      CALL0I(startup--require-comp-safetly);
+      CALL0I (startup--require-comp-safely);
       Fputhash (function_name, definition, Vcomp_deferred_pending_h);
       CALLN (Ffuncall, intern_c_string ("native--compile-async"),
             src, Qnil, Qlate);