diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2017-10-12 14:21:54 +0200 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2017-10-12 17:51:41 +0200 |
| commit | d8e89b1c794141b21ae4a87244d2c181b4a8460c (patch) | |
| tree | ec998427faac68fea16a04319fcfab5f81149904 /gnu/services.scm | |
| parent | abaee53c808fe6df02de2f403dd8904e42d5fede (diff) | |
| download | guix-d8e89b1c794141b21ae4a87244d2c181b4a8460c.tar.gz | |
offload: Reduce the number of calls to 'machine-load'.
Previously we would call 'machine-load' once per machine, which was very costly when there were many machines. Now we arrange to call it only once on average (when all the machines have the same 'speed' value). * guix/scripts/offload.scm (random-seed, shuffle): New procedures. (choose-build-machine)[machines+slots+loads]: Rename to... [machines+slots]: ... this. Remove load from the tuples therein. [undecorate]: Adjust accordingly. [machine-less-loaded-or-faster?]: Remove. [machine-faster?]: New procedure. Sort MACHINES+SLOTS according to 'machine-faster?'. Call 'machine-load?' as the last thing.
Diffstat (limited to 'gnu/services.scm')
0 files changed, 0 insertions, 0 deletions