yogsototh/stackage-server
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Documented VersionChange type

Browse source
This commit is contained in:
Konstantin Zudov 2015-10-11 06:21:02 +03:00
parent a192dcf1d2
commit c43340d40d
1 changed files with 5 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
Stackage/Snapshot/Diff.hs
View file

@ -18,6 +18,11 @@ type Version = Text
type SnapshotDiff = HashMap PackageName VersionChange
-- | Versions of a package as it occurs in the listings provided to `snapshotDiff`.
--
-- Would be represented with `These v1 v2` if the package is present in both listings,
-- otherwise it would be `This v1` if the package is present only in the first listing,
-- or `That v2` if only in the second.
newtype VersionChange = VersionChange { unVersionChange :: These Version Version }
changed :: VersionChange -> Bool