summaryrefslogtreecommitdiff
path: root/src/Job/Types.hs
diff options
context:
space:
mode:
authorRoman Smrž <roman.smrz@seznam.cz>2026-09-13 15:13:27 +0200
committerRoman Smrž <roman.smrz@seznam.cz>2026-09-18 20:56:28 +0200
commit5a7ad400ad957ab452e0319f3127631d4aeae6b0 (patch)
tree67cdec975a52ade38fd008531d82966e8b89f5f0 /src/Job/Types.hs
parent76b4a34b8adeff1097874ca683712eb00fd748b1 (diff)
Improve error messages when artifact is not found during eval
Diffstat (limited to 'src/Job/Types.hs')
-rw-r--r--src/Job/Types.hs6
1 files changed, 6 insertions, 0 deletions
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