diff options
Diffstat (limited to 'src/Job')
-rw-r--r-- | src/Job/Types.hs | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/src/Job/Types.hs b/src/Job/Types.hs index 6918738..50a6b43 100644 --- a/src/Job/Types.hs +++ b/src/Job/Types.hs @@ -36,3 +36,13 @@ data JobSet = JobSet jobsetJobs :: JobSet -> [ Job ] jobsetJobs = either (const []) id . jobsetJobsEither + + +newtype JobId = JobId [ JobIdPart ] + deriving (Eq, Ord) + +data JobIdPart + = JobIdName JobName + | JobIdCommit CommitId + | JobIdTree TreeId + deriving (Eq, Ord) |