Commit a74d1c97 authored by Juanma Barranquero's avatar Juanma Barranquero

(syms_of_lread, openp): Use empty_unibyte_string, not build_string.

parent 2c668b9a
...@@ -1199,7 +1199,7 @@ openp (path, str, suffixes, storeptr, predicate) ...@@ -1199,7 +1199,7 @@ openp (path, str, suffixes, storeptr, predicate)
fn = (char *) alloca (fn_size = 100 + want_size); fn = (char *) alloca (fn_size = 100 + want_size);
/* Loop over suffixes. */ /* Loop over suffixes. */
for (tail = NILP (suffixes) ? Fcons (build_string (""), Qnil) : suffixes; for (tail = NILP (suffixes) ? Fcons (empty_unibyte_string, Qnil) : suffixes;
CONSP (tail); tail = XCDR (tail)) CONSP (tail); tail = XCDR (tail))
{ {
int lsuffix = SBYTES (XCAR (tail)); int lsuffix = SBYTES (XCAR (tail));
...@@ -4070,8 +4070,7 @@ and, if so, which suffixes they should try to append to the file name ...@@ -4070,8 +4070,7 @@ and, if so, which suffixes they should try to append to the file name
in order to do so. However, if you want to customize which suffixes in order to do so. However, if you want to customize which suffixes
the loading functions recognize as compression suffixes, you should the loading functions recognize as compression suffixes, you should
customize `jka-compr-load-suffixes' rather than the present variable. */); customize `jka-compr-load-suffixes' rather than the present variable. */);
/* We don't use empty_string because it's not initialized yet. */ Vload_file_rep_suffixes = Fcons (empty_unibyte_string, Qnil);
Vload_file_rep_suffixes = Fcons (build_string (""), Qnil);
DEFVAR_BOOL ("load-in-progress", &load_in_progress, DEFVAR_BOOL ("load-in-progress", &load_in_progress,
doc: /* Non-nil iff inside of `load'. */); doc: /* Non-nil iff inside of `load'. */);
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment