From d8354b8f1b2bbb6d911070ca9822c7e4fbd88bca Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Roman=20Smr=C5=BE?= <roman.smrz@seznam.cz>
Date: Sat, 8 Nov 2025 19:50:57 +0100
Subject: Options to select rerun behavior

Changelog: Added `--rerun-*` command-line options to configure which jobs should be rerun
---
 src/Output.hs | 5 +++++
 1 file changed, 5 insertions(+)

(limited to 'src/Output.hs')

diff --git a/src/Output.hs b/src/Output.hs
index 4ecf08e..5fa2f81 100644
--- a/src/Output.hs
+++ b/src/Output.hs
@@ -46,6 +46,7 @@ data OutputEvent
     | JobFinished JobId Text
     | JobIsDuplicate JobId Text
     | JobPreviouslyFinished JobId Text
+    | JobWasSkipped JobId
 
 data OutputFootnote = OutputFootnote
     { footnoteText :: Text
@@ -119,6 +120,10 @@ outputEvent out@Output {..} = liftIO . \case
         forM_ outLogs $ \h -> outStrLn out h ("Previously finished " <> textJobId jid <> " (" <> status <> ")")
         forM_ outTest $ \h -> outStrLn out h ("job-previous " <> textJobId jid <> " " <> status)
 
+    JobWasSkipped jid -> do
+        forM_ outLogs $ \h -> outStrLn out h ("Skipped " <> textJobId jid)
+        forM_ outTest $ \h -> outStrLn out h ("job-skip " <> textJobId jid)
+
 outputFootnote :: Output -> Text -> IO OutputFootnote
 outputFootnote out@Output {..} footnoteText = do
     footnoteTerminal <- forM outTerminal $ \term -> newFootnote term footnoteText
-- 
cgit v1.2.3