host reuse: Bump host share reuse bonus

In test jobs this is now contending with the variation bonus.

If we fail to vary properly this time, we get another go in the next
flight, so this is not so critical.

This increases the amount of test host reuse.

Signed-off-by: Ian Jackson <Ian.Jackson@eu.citrix.com>

diff --git a/ts-hosts-allocate-Executive b/ts-hosts-allocate-Executive
index c1002fc900980def96fcdab7d71a7f6b0e11653f..b216186a49e5a9ff2cbd1a6970b0e72a49870aad 100755 (executable)
--- a/ts-hosts-allocate-Executive
+++ b/ts-hosts-allocate-Executive
@@ -673,7 +673,7 @@ sub hid_recurse ($$) {
     $prevfail_bonus //= 7.0*86400;
     my $prevfail_equiv_bonus = $prevfail_bonus * (6.5 / 7.0);
 
-    my $share_reuse_bonus = $r{hostalloc_bonus_sharereuse} // 10000;
+    my $share_reuse_bonus = $r{hostalloc_bonus_sharereuse} // 20000;
 
     my $cost= $start_time
        + $duration_for_cost