Use empty list instead of None

Signed-off-by: Nicolás Ojeda Bär <n.oje.bar@gmail.com>
ocaml · Aug 20, 2019 · 3d9c770 · 3d9c770
1 parent faabc35
commit 3d9c770
Showing 1 changed file with 3 additions and 3 deletions.
diff --git a/src/dune/exe_rules.ml b/src/dune/exe_rules.ml
@@ -110,7 +110,7 @@ let executables_rules ~sctx ~dir ~expander ~dir_contents ~scope ~compile_info
   in
   let o_files =
     if not (Executables.has_stubs exes) then
-      None
+      []
     else (
       if List.mem Exe.Linkage.byte ~set:linkages then
         User_error.raise ~loc:exes.buildable.loc
@@ -126,11 +126,11 @@ let executables_rules ~sctx ~dir ~expander ~dir_contents ~scope ~compile_info
         |> List.map ~f:Path.build
       in
       Check_rules.add_files sctx ~dir o_files;
-      Some o_files
+      o_files
     )
   in
   let requires_compile = Compilation_context.requires_compile cctx in
-  Exe.build_and_link_many cctx ~programs ~linkages ~link_flags ?o_files
+  Exe.build_and_link_many cctx ~programs ~linkages ~link_flags ~o_files
     ~promote:exes.promote;
   ( cctx
   , Merlin.make () ~requires:requires_compile ~flags ~modules