Do timeout checks before doing the work, not after

Otherwise it may finish the work but then bail out with a useless
answer.

Quite likely this makes no difference now, but it will once we start
working on issue #189.

Author: AlexDaniel

Benchable.p6

@@ -86,6 +86,9 @@ method process($msg, $config, $code) {
     my $actually-tested = 0;
     for @commits -> $commit {
         FIRST my $once = ‘Give me a ping, Vasili. One ping only, please.’;
+        if now - $start-time > TOTAL-TIME {
+            grumble “«hit the total time limit of {TOTAL-TIME} seconds»”
+        }
         # convert to real ids so we can look up the builds
         my $full-commit = self.to-full-commit: $commit;
         my $short-commit = self.get-short-commit: $commit;
@@ -109,9 +112,6 @@ method process($msg, $config, $code) {
             }
             $actually-tested++
         }
-        if now - $start-time > TOTAL-TIME {
-            grumble “«hit the total time limit of {TOTAL-TIME} seconds»”
-        }
     }
 
     # for these config options, check if there are any large speed differences between two commits and if so,