flambda-backend: Four small inliner fixes (ocaml#379)

mshinwell · web-flow · commit 3620c589221d · 2021-11-11T10:11:56.000Z
diff --git a/utils/clflags.ml b/utils/clflags.ml
@@ -642,7 +642,7 @@ module Flambda2 = struct
       indirect_call_cost = Some (3.0 *. Default.indirect_call_cost);
       poly_compare_cost = Some (3.0 *. Default.poly_compare_cost);
       small_function_size = Some (10 * Default.small_function_size);
-      large_function_size = Some (100 * Default.large_function_size);
+      large_function_size = Some (50 * Default.large_function_size);
       threshold = Some 100.;
     }
   end

Original file line number	Diff line number	Diff line change
`@@ -642,7 +642,7 @@ module Flambda2 = struct`
`642`	`642`	`indirect_call_cost = Some (3.0 *. Default.indirect_call_cost);`
`643`	`643`	`poly_compare_cost = Some (3.0 *. Default.poly_compare_cost);`
`644`	`644`	`small_function_size = Some (10 * Default.small_function_size);`
`645`		`- large_function_size = Some (100 * Default.large_function_size);`
	`645`	`+ large_function_size = Some (50 * Default.large_function_size);`
`646`	`646`	`threshold = Some 100.;`
`647`	`647`	`}`
`648`	`648`	`end`