* src/lread.c (Fload): Clean-up unnecessary sanity check.

'is_native_elisp' can't be non zero if NATIVE_COMP_FLAG is not set.

diff --git a/src/lread.c b/src/lread.c
index 9bd60b9b386db6fe88d0ec99c4c629397149ca0b..1e05ac69320cbba014b066ba21982784235627b7 100644 (file)
--- a/src/lread.c
+++ b/src/lread.c
@@ -1506,22 +1506,16 @@ Return t if the file exists and loads successfully.  */)
     }
   else if (is_native_elisp)
     {
-      if (NATIVE_COMP_FLAG)
+      specbind (Qcurrent_load_list, Qnil);
+      if (!NILP (Vpurify_flag))
        {
-         specbind (Qcurrent_load_list, Qnil);
-         if (!NILP (Vpurify_flag))
-           {
-             Lisp_Object base = parent_directory (Ffile_name_directory (found));
-             Lisp_Object offset = Flength (base);
-             hist_file_name = Fsubstring (found, offset, Qnil);
-           }
-         LOADHIST_ATTACH (hist_file_name);
-         Fnative_elisp_load (found, Qnil);
-         build_load_history (hist_file_name, true);
+         Lisp_Object base = parent_directory (Ffile_name_directory (found));
+         Lisp_Object offset = Flength (base);
+         hist_file_name = Fsubstring (found, offset, Qnil);
        }
-      else
-       /* This cannot happen.  */
-       emacs_abort ();
+      LOADHIST_ATTACH (hist_file_name);
+      Fnative_elisp_load (found, Qnil);
+      build_load_history (hist_file_name, true);
     }
   else
     {