From 5a7ad400ad957ab452e0319f3127631d4aeae6b0 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Roman=20Smr=C5=BE?= <roman.smrz@seznam.cz>
Date: Sun, 13 Sep 2026 15:13:27 +0200
Subject: Improve error messages when artifact is not found during eval

---
 src/Job/Types.hs | 6 ++++++
 1 file changed, 6 insertions(+)

(limited to 'src/Job/Types.hs')

diff --git a/src/Job/Types.hs b/src/Job/Types.hs
index c7a859d..204df60 100644
--- a/src/Job/Types.hs
+++ b/src/Job/Types.hs
@@ -87,6 +87,12 @@ data ArtifactName = ArtifactName Text
 
 type ArtifactSpec d = ( JobId' d, ArtifactName )
 
+stringArtifactName :: ArtifactName -> String
+stringArtifactName (ArtifactName name) = T.unpack name
+
+textArtifactName :: ArtifactName -> Text
+textArtifactName (ArtifactName name) = name
+
 
 data JobSet' d = JobSet
     { jobsetId :: JobSetId' d
-- 
cgit v1.2.3