From f9a215921b8181ff5733bab8f924649d7b1ca3b3 Mon Sep 17 00:00:00 2001 From: Rudi Grinberg Date: Thu, 31 May 2018 14:01:22 +0700 Subject: [PATCH] Wait for deps and sdeps at once Signed-off-by: Rudi Grinberg --- src/super_context.ml | 4 +--- 1 file changed, 1 insertion(+), 3 deletions(-) diff --git a/src/super_context.ml b/src/super_context.ml index d9ff5648..deb6ff96 100644 --- a/src/super_context.ml +++ b/src/super_context.ml @@ -808,9 +808,7 @@ module Action = struct let build = Build.record_lib_deps_simple forms.lib_deps >>> - Build.path_set deps - >>> - Build.path_set forms.sdeps + Build.path_set (Path.Set.union deps forms.sdeps) >>> Build.arr (fun paths -> ((), paths)) >>>