aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/lread.c7
1 files changed, 4 insertions, 3 deletions
diff --git a/src/lread.c b/src/lread.c
index acd2fea6881..32c83bfae8b 100644
--- a/src/lread.c
+++ b/src/lread.c
@@ -1058,9 +1058,9 @@ This uses the variables `load-suffixes' and `load-file-rep-suffixes'. */)
1058static Lisp_Object 1058static Lisp_Object
1059effective_load_path (void) 1059effective_load_path (void)
1060{ 1060{
1061 if (!NATIVE_COMP_FLAG) 1061#ifndef HAVE_NATIVE_COMP
1062 return Vload_path; 1062 return Vload_path;
1063 1063#else
1064 Lisp_Object lp = Vload_path; 1064 Lisp_Object lp = Vload_path;
1065 Lisp_Object new_lp = Qnil; 1065 Lisp_Object new_lp = Qnil;
1066 FOR_EACH_TAIL (lp) 1066 FOR_EACH_TAIL (lp)
@@ -1073,6 +1073,7 @@ effective_load_path (void)
1073 new_lp = Fcons (el, new_lp); 1073 new_lp = Fcons (el, new_lp);
1074 } 1074 }
1075 return Fnreverse (new_lp); 1075 return Fnreverse (new_lp);
1076#endif
1076} 1077}
1077 1078
1078/* Return true if STRING ends with SUFFIX. */ 1079/* Return true if STRING ends with SUFFIX. */