diff options
Diffstat (limited to 'src/Job/Types.hs')
| -rw-r--r-- | src/Job/Types.hs | 6 |
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 |