···

       
464
       
464
       
 
       
         if' (isNothing mergeableJob) "No `mergeable` job found." <>

     

       
465
       
465
       
 
       
         if' (isNothing maintainedJob) "No `maintained` job found." <>

     

       
466
       
466
       
 
       
         if' (Unfinished > maybe Success worstState mergeableJob) "`mergeable` jobset failed." <>

     

       
467
       
467
       
-
       
         if' (outstandingJobs (Platform "x86_64-linux") > 100) "Too much outstanding jobs on x86_64-linux." <>

     

       
468
       
468
       
-
       
         if' (outstandingJobs (Platform "aarch64-linux") > 100) "Too much outstanding jobs on aarch64-linux."

     

       
467
       
467
       
+
       
         if' (outstandingJobs (Platform "x86_64-linux") > 100) "Too many outstanding jobs on x86_64-linux." <>

     

       
468
       
468
       
+
       
         if' (outstandingJobs (Platform "aarch64-linux") > 100) "Too many outstanding jobs on aarch64-linux."

     

       
469
       
469
       
 
       
      if' p e = if p then [e] else mempty

     

       
470
       
470
       
 
       
      outstandingJobs platform | Table m <- numSummary = Map.findWithDefault 0 (platform, Unfinished) m

     

       
471
       
471
       
 
       
      maintainedJob = Map.lookup "maintained" summary