diff --git a/Cabal-syntax/src/Distribution/Types/VersionInterval.hs b/Cabal-syntax/src/Distribution/Types/VersionInterval.hs index 517c1049113..5a7d0e75352 100644 --- a/Cabal-syntax/src/Distribution/Types/VersionInterval.hs +++ b/Cabal-syntax/src/Distribution/Types/VersionInterval.hs @@ -209,7 +209,7 @@ unionBound _ _ = InclusiveBound -- Each interval is non-empty. The sequence is in increasing order and no -- intervals overlap or touch. Therefore only the first and last can be -- unbounded. The sequence can be empty if the range is empty --- (e.g. a range expression like @< 1 && > 2@). +-- (e.g. a range expression like @\< 1 && > 2@). -- -- Other checks are trivial to implement using this view. For example: -- diff --git a/Cabal-syntax/src/Distribution/Version.hs b/Cabal-syntax/src/Distribution/Version.hs index bfa58d2be23..2abf88100a8 100644 --- a/Cabal-syntax/src/Distribution/Version.hs +++ b/Cabal-syntax/src/Distribution/Version.hs @@ -163,13 +163,13 @@ simplifyVersionRange vr vi = toVersionIntervals vr -- | Given a version range, remove the highest upper bound. Example: @(>= 1 && < --- 3) || (>= 4 && < 5)@ is converted to @(>= 1 && < 3) || (>= 4)@. +-- 3) || (>= 4 && < 5)@ is converted to @(>= 1 && < 3) || (\>= 4)@. removeUpperBound :: VersionRange -> VersionRange removeUpperBound = fromVersionIntervals . relaxLastInterval . toVersionIntervals -- | Given a version range, remove the lowest lower bound. --- Example: @(>= 1 && < 3) || (>= 4 && < 5)@ is converted to --- @(>= 0 && < 3) || (>= 4 && < 5)@. +-- Example: @(>= 1 && < 3) || (\>= 4 && < 5)@ is converted to +-- @(>= 0 && < 3) || (\>= 4 && < 5)@. removeLowerBound :: VersionRange -> VersionRange removeLowerBound = fromVersionIntervals . relaxHeadInterval . toVersionIntervals