From 1fdc41e6539b65a67233e5f67f3096d6fea7aec4 Mon Sep 17 00:00:00 2001 From: Rudi Grinberg Date: Sun, 31 Aug 2025 22:06:15 +0100 Subject: [PATCH] refactor(boot): move ocaml-config bindings Signed-off-by: Rudi Grinberg --- boot/duneboot.ml | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/boot/duneboot.ml b/boot/duneboot.ml index 96b94c27488..9723506a7dc 100644 --- a/boot/duneboot.ml +++ b/boot/duneboot.ml @@ -1585,11 +1585,11 @@ let main () = try String.Map.find "ext_obj" ocaml_config with | Not_found -> ".o" in - let ccomp_type = String.Map.find "ccomp_type" ocaml_config in - let architecture = String.Map.find "architecture" ocaml_config in - let word_size = String.Map.find "word_size" ocaml_config in - let os_type = String.Map.find "os_type" ocaml_config in let* libraries = + let ccomp_type = String.Map.find "ccomp_type" ocaml_config in + let word_size = String.Map.find "word_size" ocaml_config in + let os_type = String.Map.find "os_type" ocaml_config in + let architecture = String.Map.find "architecture" ocaml_config in assemble_libraries task ~ext_obj ~ccomp_type ~architecture ~word_size ~os_type in let c_files = List.concat_map ~f:(fun (lib : Library.t) -> lib.c_files) libraries in