Use List.rev_append in Res_compmisc.init_path

add changelog entry
melange-re · Feb 23, 2023 · 131c2da · 131c2da
1 parent fd7b60e
commit 131c2da
Show file tree

Hide file tree

Showing 2 changed files with 6 additions and 2 deletions.
diff --git a/Changes.md b/Changes.md
@@ -29,6 +29,8 @@ Unreleased
   ([#482](https://github.com/melange-re/melange/pull/482))
 - melange: fix codegen issue accessing a nested module path that is also
   `include`d ([#487](https://github.com/melange-re/melange/pull/487))
+- melange: preserve the correct command-line order for load path directories
+  ([#492](https://github.com/melange-re/melange/pull/492))
 
 0.3.2 2022-11-19
 ---------------

diff --git a/jscomp/core/res_compmisc.ml b/jscomp/core/res_compmisc.ml
@@ -28,8 +28,10 @@ let init_path () =
     List.map (Misc.expand_directory Config.standard_library) dirs
   in
   Load_path.reset ();
-  List.iter Load_path.add_dir
-    (List.rev (Lazy.force Js_config.stdlib_path :: exp_dirs));
+  let exp_dirs =
+    List.rev_append exp_dirs [ Lazy.force Js_config.stdlib_path ]
+  in
+  List.iter Load_path.add_dir exp_dirs;
   Ext_log.dwarn ~__POS__ "Compiler include dirs: %s@."
     (String.concat "; " (Load_path.get_paths ()));