From: Po Lu <luangruo@yahoo.com>
Date: Sun, 18 Dec 2022 10:05:57 +0000 (+0800)
Subject: Fix the MS-DOS build
X-Git-Tag: emacs-29.0.90~1087
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=897f33bf316;p=emacs.git

Fix the MS-DOS build

* src/lread.c (syms_of_lread): Make the MS-DOS build work again.
---

diff --git a/src/lread.c b/src/lread.c
index 51ea3e5b929..d838a18de5a 100644
--- a/src/lread.c
+++ b/src/lread.c
@@ -5479,11 +5479,16 @@ to the specified file name if a suffix is allowed or required.  */);
 
   DEFVAR_LISP ("dynamic-library-suffixes", Vdynamic_library_suffixes,
 	       doc: /* A list of suffixes for loadable dynamic libraries.  */);
-  Vdynamic_library_suffixes =
-    Fcons (build_pure_c_string (DYNAMIC_LIB_SECONDARY_SUFFIX), Qnil);
-  Vdynamic_library_suffixes =
-    Fcons (build_pure_c_string (DYNAMIC_LIB_SUFFIX),
-	   Vdynamic_library_suffixes);
+
+#ifndef MSDOS
+  Vdynamic_library_suffixes
+    = Fcons (build_pure_c_string (DYNAMIC_LIB_SECONDARY_SUFFIX), Qnil);
+  Vdynamic_library_suffixes
+    = Fcons (build_pure_c_string (DYNAMIC_LIB_SUFFIX),
+	     Vdynamic_library_suffixes);
+#else
+  Vdynamic_library_suffixes = Qnil;
+#endif
 
   DEFVAR_LISP ("load-file-rep-suffixes", Vload_file_rep_suffixes,
 	       doc: /* List of suffixes that indicate representations of \