-- Hoogle documentation, generated by Haddock
-- See Hoogle, http://www.haskell.org/hoogle/
-- | Semantic Version
--
-- Semantic Version https://semver.org/
@package semantic-version
@version 0.0.2
module Data.SemanticVersion.NonDigit
data NonDigit
NonDigitHyphen :: NonDigit
NonDigitLetter :: Alpha -> NonDigit
class HasNonDigit a
nonDigit :: HasNonDigit a => Lens' a NonDigit
class AsNonDigit a
_NonDigit :: AsNonDigit a => Prism' a NonDigit
_NonDigitHyphen :: AsNonDigit a => Prism' a ()
_NonDigitLetter :: AsNonDigit a => Prism' a Alpha
-- |
-- >>> parse parseNonDigit "parseNonDigit" "a"
-- Right (NonDigitLetter (AlphaLower Lower_a))
--
--
--
-- >>> isLeft (parse parseNonDigit "parseNonDigit" "")
-- True
--
--
--
-- >>> parse parseIdentifierCharacter "parseNonDigit" "Abc"
-- Right (IdentifierCharacterNonDigit (NonDigitLetter (AlphaUpper Upper_A)))
--
--
--
-- >>> parse parseIdentifierCharacter "parseNonDigit" "0"
-- Right (IdentifierCharacterDigit DecDigit0)
--
--
--
-- >>> parse parseIdentifierCharacter "parseNonDigit" "-"
-- Right (IdentifierCharacterNonDigit NonDigitHyphen)
--
--
--
-- >>> isLeft (parse parseNonDigit "parseNonDigit" "+")
-- True
--
--
--
-- >>> isLeft (parse parseNonDigit "parseNonDigit" "9")
-- True
--
parseNonDigit :: CharParsing p => p NonDigit
instance GHC.Show.Show Data.SemanticVersion.NonDigit.NonDigit
instance GHC.Classes.Eq Data.SemanticVersion.NonDigit.NonDigit
instance Data.SemanticVersion.NonDigit.AsNonDigit Data.SemanticVersion.NonDigit.NonDigit
instance Data.Char.Alpha.CA Data.SemanticVersion.NonDigit.NonDigit
instance Data.Char.Alpha.CB Data.SemanticVersion.NonDigit.NonDigit
instance Data.Char.Alpha.CC Data.SemanticVersion.NonDigit.NonDigit
instance Data.Char.Alpha.CD Data.SemanticVersion.NonDigit.NonDigit
instance Data.Char.Alpha.CE Data.SemanticVersion.NonDigit.NonDigit
instance Data.Char.Alpha.CF Data.SemanticVersion.NonDigit.NonDigit
instance Data.Char.Alpha.CG Data.SemanticVersion.NonDigit.NonDigit
instance Data.Char.Alpha.CH Data.SemanticVersion.NonDigit.NonDigit
instance Data.Char.Alpha.CI Data.SemanticVersion.NonDigit.NonDigit
instance Data.Char.Alpha.CJ Data.SemanticVersion.NonDigit.NonDigit
instance Data.Char.Alpha.CK Data.SemanticVersion.NonDigit.NonDigit
instance Data.Char.Alpha.CL Data.SemanticVersion.NonDigit.NonDigit
instance Data.Char.Alpha.CM Data.SemanticVersion.NonDigit.NonDigit
instance Data.Char.Alpha.CN Data.SemanticVersion.NonDigit.NonDigit
instance Data.Char.Alpha.CO Data.SemanticVersion.NonDigit.NonDigit
instance Data.Char.Alpha.CP Data.SemanticVersion.NonDigit.NonDigit
instance Data.Char.Alpha.CQ Data.SemanticVersion.NonDigit.NonDigit
instance Data.Char.Alpha.CR Data.SemanticVersion.NonDigit.NonDigit
instance Data.Char.Alpha.CS Data.SemanticVersion.NonDigit.NonDigit
instance Data.Char.Alpha.CT Data.SemanticVersion.NonDigit.NonDigit
instance Data.Char.Alpha.CU Data.SemanticVersion.NonDigit.NonDigit
instance Data.Char.Alpha.CV Data.SemanticVersion.NonDigit.NonDigit
instance Data.Char.Alpha.CW Data.SemanticVersion.NonDigit.NonDigit
instance Data.Char.Alpha.CX Data.SemanticVersion.NonDigit.NonDigit
instance Data.Char.Alpha.CY Data.SemanticVersion.NonDigit.NonDigit
instance Data.Char.Alpha.CZ Data.SemanticVersion.NonDigit.NonDigit
instance Data.Char.Alpha.Ca Data.SemanticVersion.NonDigit.NonDigit
instance Data.Char.Alpha.Cb Data.SemanticVersion.NonDigit.NonDigit
instance Data.Char.Alpha.Cc Data.SemanticVersion.NonDigit.NonDigit
instance Data.Char.Alpha.Cd Data.SemanticVersion.NonDigit.NonDigit
instance Data.Char.Alpha.Ce Data.SemanticVersion.NonDigit.NonDigit
instance Data.Char.Alpha.Cf Data.SemanticVersion.NonDigit.NonDigit
instance Data.Char.Alpha.Cg Data.SemanticVersion.NonDigit.NonDigit
instance Data.Char.Alpha.Ch Data.SemanticVersion.NonDigit.NonDigit
instance Data.Char.Alpha.Ci Data.SemanticVersion.NonDigit.NonDigit
instance Data.Char.Alpha.Cj Data.SemanticVersion.NonDigit.NonDigit
instance Data.Char.Alpha.Ck Data.SemanticVersion.NonDigit.NonDigit
instance Data.Char.Alpha.Cl Data.SemanticVersion.NonDigit.NonDigit
instance Data.Char.Alpha.Cm Data.SemanticVersion.NonDigit.NonDigit
instance Data.Char.Alpha.Cn Data.SemanticVersion.NonDigit.NonDigit
instance Data.Char.Alpha.Co Data.SemanticVersion.NonDigit.NonDigit
instance Data.Char.Alpha.Cp Data.SemanticVersion.NonDigit.NonDigit
instance Data.Char.Alpha.Cq Data.SemanticVersion.NonDigit.NonDigit
instance Data.Char.Alpha.Cr Data.SemanticVersion.NonDigit.NonDigit
instance Data.Char.Alpha.Cs Data.SemanticVersion.NonDigit.NonDigit
instance Data.Char.Alpha.Ct Data.SemanticVersion.NonDigit.NonDigit
instance Data.Char.Alpha.Cu Data.SemanticVersion.NonDigit.NonDigit
instance Data.Char.Alpha.Cv Data.SemanticVersion.NonDigit.NonDigit
instance Data.Char.Alpha.Cw Data.SemanticVersion.NonDigit.NonDigit
instance Data.Char.Alpha.Cx Data.SemanticVersion.NonDigit.NonDigit
instance Data.Char.Alpha.Cy Data.SemanticVersion.NonDigit.NonDigit
instance Data.Char.Alpha.Cz Data.SemanticVersion.NonDigit.NonDigit
instance Data.SemanticVersion.NonDigit.HasNonDigit Data.SemanticVersion.NonDigit.NonDigit
module Data.SemanticVersion.IdentifierCharacter
data IdentifierCharacter
IdentifierCharacterDigit :: DecDigit -> IdentifierCharacter
IdentifierCharacterNonDigit :: NonDigit -> IdentifierCharacter
class HasIdentifierCharacter a
identifierCharacter :: HasIdentifierCharacter a => Lens' a IdentifierCharacter
class AsIdentifierCharacter a
_IdentifierCharacter :: AsIdentifierCharacter a => Prism' a IdentifierCharacter
_IdentifierCharacterDigit :: AsIdentifierCharacter a => Prism' a DecDigit
-- |
-- >>> parse (parseIdentifierCharacter <* eof) "parseIdentifierCharacter" "a"
-- Right (IdentifierCharacterNonDigit (NonDigitLetter (AlphaLower Lower_a)))
--
--
--
-- >>> isLeft (parse parseIdentifierCharacter "parseIdentifierCharacter" "")
-- True
--
--
--
-- >>> parse parseIdentifierCharacter "parseIdentifierCharacter" "Abc"
-- Right (IdentifierCharacterNonDigit (NonDigitLetter (AlphaUpper Upper_A)))
--
--
--
-- >>> parse (parseIdentifierCharacter <* eof) "parseIdentifierCharacter" "-"
-- Right (IdentifierCharacterNonDigit NonDigitHyphen)
--
--
--
-- >>> parse (parseIdentifierCharacter <* eof) "parseIdentifierCharacter" "0"
-- Right (IdentifierCharacterDigit DecDigit0)
--
--
--
-- >>> parse (parseIdentifierCharacter <* eof) "parseIdentifierCharacter" "9"
-- Right (IdentifierCharacterDigit DecDigit9)
--
--
--
-- >>> isLeft (parse parseIdentifierCharacter "parseIdentifierCharacter" "+")
-- True
--
--
--
-- >>> isLeft (parse parseIdentifierCharacter "parseIdentifierCharacter" "")
-- True
--
--
--
-- >>> parse parseIdentifierCharacter "parseIdentifierCharacter" "01"
-- Right (IdentifierCharacterDigit DecDigit0)
--
--
--
-- >>> parse parseIdentifierCharacter "parseIdentifierCharacter" "10"
-- Right (IdentifierCharacterDigit DecDigit1)
--
--
--
-- >>> parse parseIdentifierCharacter "parseIdentifierCharacter" "38012"
-- Right (IdentifierCharacterDigit DecDigit3)
--
--
--
-- >>> parse (parseIdentifierCharacter <* eof) "parseIdentifierCharacter" "a"
-- Right (IdentifierCharacterNonDigit (NonDigitLetter (AlphaLower Lower_a)))
--
parseIdentifierCharacter :: CharParsing p => p IdentifierCharacter
instance GHC.Show.Show Data.SemanticVersion.IdentifierCharacter.IdentifierCharacter
instance GHC.Classes.Eq Data.SemanticVersion.IdentifierCharacter.IdentifierCharacter
instance Data.SemanticVersion.IdentifierCharacter.AsIdentifierCharacter Data.SemanticVersion.IdentifierCharacter.IdentifierCharacter
instance Data.Digit.Class.D0.D0 Data.SemanticVersion.IdentifierCharacter.IdentifierCharacter
instance Data.Digit.Class.D1.D1 Data.SemanticVersion.IdentifierCharacter.IdentifierCharacter
instance Data.Digit.Class.D2.D2 Data.SemanticVersion.IdentifierCharacter.IdentifierCharacter
instance Data.Digit.Class.D3.D3 Data.SemanticVersion.IdentifierCharacter.IdentifierCharacter
instance Data.Digit.Class.D4.D4 Data.SemanticVersion.IdentifierCharacter.IdentifierCharacter
instance Data.Digit.Class.D5.D5 Data.SemanticVersion.IdentifierCharacter.IdentifierCharacter
instance Data.Digit.Class.D6.D6 Data.SemanticVersion.IdentifierCharacter.IdentifierCharacter
instance Data.Digit.Class.D7.D7 Data.SemanticVersion.IdentifierCharacter.IdentifierCharacter
instance Data.Digit.Class.D8.D8 Data.SemanticVersion.IdentifierCharacter.IdentifierCharacter
instance Data.Digit.Class.D9.D9 Data.SemanticVersion.IdentifierCharacter.IdentifierCharacter
instance Data.SemanticVersion.IdentifierCharacter.HasIdentifierCharacter Data.SemanticVersion.IdentifierCharacter.IdentifierCharacter
instance Data.SemanticVersion.NonDigit.AsNonDigit Data.SemanticVersion.IdentifierCharacter.IdentifierCharacter
instance Data.Char.Alpha.CA Data.SemanticVersion.IdentifierCharacter.IdentifierCharacter
instance Data.Char.Alpha.CB Data.SemanticVersion.IdentifierCharacter.IdentifierCharacter
instance Data.Char.Alpha.CC Data.SemanticVersion.IdentifierCharacter.IdentifierCharacter
instance Data.Char.Alpha.CD Data.SemanticVersion.IdentifierCharacter.IdentifierCharacter
instance Data.Char.Alpha.CE Data.SemanticVersion.IdentifierCharacter.IdentifierCharacter
instance Data.Char.Alpha.CF Data.SemanticVersion.IdentifierCharacter.IdentifierCharacter
instance Data.Char.Alpha.CG Data.SemanticVersion.IdentifierCharacter.IdentifierCharacter
instance Data.Char.Alpha.CH Data.SemanticVersion.IdentifierCharacter.IdentifierCharacter
instance Data.Char.Alpha.CI Data.SemanticVersion.IdentifierCharacter.IdentifierCharacter
instance Data.Char.Alpha.CJ Data.SemanticVersion.IdentifierCharacter.IdentifierCharacter
instance Data.Char.Alpha.CK Data.SemanticVersion.IdentifierCharacter.IdentifierCharacter
instance Data.Char.Alpha.CL Data.SemanticVersion.IdentifierCharacter.IdentifierCharacter
instance Data.Char.Alpha.CM Data.SemanticVersion.IdentifierCharacter.IdentifierCharacter
instance Data.Char.Alpha.CN Data.SemanticVersion.IdentifierCharacter.IdentifierCharacter
instance Data.Char.Alpha.CO Data.SemanticVersion.IdentifierCharacter.IdentifierCharacter
instance Data.Char.Alpha.CP Data.SemanticVersion.IdentifierCharacter.IdentifierCharacter
instance Data.Char.Alpha.CQ Data.SemanticVersion.IdentifierCharacter.IdentifierCharacter
instance Data.Char.Alpha.CR Data.SemanticVersion.IdentifierCharacter.IdentifierCharacter
instance Data.Char.Alpha.CS Data.SemanticVersion.IdentifierCharacter.IdentifierCharacter
instance Data.Char.Alpha.CT Data.SemanticVersion.IdentifierCharacter.IdentifierCharacter
instance Data.Char.Alpha.CU Data.SemanticVersion.IdentifierCharacter.IdentifierCharacter
instance Data.Char.Alpha.CV Data.SemanticVersion.IdentifierCharacter.IdentifierCharacter
instance Data.Char.Alpha.CW Data.SemanticVersion.IdentifierCharacter.IdentifierCharacter
instance Data.Char.Alpha.CX Data.SemanticVersion.IdentifierCharacter.IdentifierCharacter
instance Data.Char.Alpha.CY Data.SemanticVersion.IdentifierCharacter.IdentifierCharacter
instance Data.Char.Alpha.CZ Data.SemanticVersion.IdentifierCharacter.IdentifierCharacter
instance Data.Char.Alpha.Ca Data.SemanticVersion.IdentifierCharacter.IdentifierCharacter
instance Data.Char.Alpha.Cb Data.SemanticVersion.IdentifierCharacter.IdentifierCharacter
instance Data.Char.Alpha.Cc Data.SemanticVersion.IdentifierCharacter.IdentifierCharacter
instance Data.Char.Alpha.Cd Data.SemanticVersion.IdentifierCharacter.IdentifierCharacter
instance Data.Char.Alpha.Ce Data.SemanticVersion.IdentifierCharacter.IdentifierCharacter
instance Data.Char.Alpha.Cf Data.SemanticVersion.IdentifierCharacter.IdentifierCharacter
instance Data.Char.Alpha.Cg Data.SemanticVersion.IdentifierCharacter.IdentifierCharacter
instance Data.Char.Alpha.Ch Data.SemanticVersion.IdentifierCharacter.IdentifierCharacter
instance Data.Char.Alpha.Ci Data.SemanticVersion.IdentifierCharacter.IdentifierCharacter
instance Data.Char.Alpha.Cj Data.SemanticVersion.IdentifierCharacter.IdentifierCharacter
instance Data.Char.Alpha.Ck Data.SemanticVersion.IdentifierCharacter.IdentifierCharacter
instance Data.Char.Alpha.Cl Data.SemanticVersion.IdentifierCharacter.IdentifierCharacter
instance Data.Char.Alpha.Cm Data.SemanticVersion.IdentifierCharacter.IdentifierCharacter
instance Data.Char.Alpha.Cn Data.SemanticVersion.IdentifierCharacter.IdentifierCharacter
instance Data.Char.Alpha.Co Data.SemanticVersion.IdentifierCharacter.IdentifierCharacter
instance Data.Char.Alpha.Cp Data.SemanticVersion.IdentifierCharacter.IdentifierCharacter
instance Data.Char.Alpha.Cq Data.SemanticVersion.IdentifierCharacter.IdentifierCharacter
instance Data.Char.Alpha.Cr Data.SemanticVersion.IdentifierCharacter.IdentifierCharacter
instance Data.Char.Alpha.Cs Data.SemanticVersion.IdentifierCharacter.IdentifierCharacter
instance Data.Char.Alpha.Ct Data.SemanticVersion.IdentifierCharacter.IdentifierCharacter
instance Data.Char.Alpha.Cu Data.SemanticVersion.IdentifierCharacter.IdentifierCharacter
instance Data.Char.Alpha.Cv Data.SemanticVersion.IdentifierCharacter.IdentifierCharacter
instance Data.Char.Alpha.Cw Data.SemanticVersion.IdentifierCharacter.IdentifierCharacter
instance Data.Char.Alpha.Cx Data.SemanticVersion.IdentifierCharacter.IdentifierCharacter
instance Data.Char.Alpha.Cy Data.SemanticVersion.IdentifierCharacter.IdentifierCharacter
instance Data.Char.Alpha.Cz Data.SemanticVersion.IdentifierCharacter.IdentifierCharacter
module Data.SemanticVersion.IdentifierCharacters
newtype IdentifierCharacters
IdentifierCharacters :: NonEmpty IdentifierCharacter -> IdentifierCharacters
class HasIdentifierCharacters a
identifierCharacters :: HasIdentifierCharacters a => Lens' a IdentifierCharacters
class AsIdentifierCharacters a
_IdentifierCharacters :: AsIdentifierCharacters a => Prism' a IdentifierCharacters
-- |
-- >>> parse (parseIdentifierCharacters <* eof) "parseIdentifierCharacters" "a"
-- Right (IdentifierCharacters (IdentifierCharacterNonDigit (NonDigitLetter (AlphaLower Lower_a)) :| []))
--
--
--
-- >>> isLeft (parse parseIdentifierCharacters "parseIdentifierCharacters" "")
-- True
--
--
--
-- >>> parse (parseIdentifierCharacters <* eof) "parseIdentifierCharacters" "0"
-- Right (IdentifierCharacters (IdentifierCharacterDigit DecDigit0 :| []))
--
--
--
-- >>> parse (parseIdentifierCharacters <* eof) "parseIdentifierCharacters" "Abc"
-- Right (IdentifierCharacters (IdentifierCharacterNonDigit (NonDigitLetter (AlphaUpper Upper_A)) :| [IdentifierCharacterNonDigit (NonDigitLetter (AlphaLower Lower_b)),IdentifierCharacterNonDigit (NonDigitLetter (AlphaLower Lower_c))]))
--
--
--
-- >>> parse (parseIdentifierCharacters <* eof) "parseIdentifierCharacters" "-"
-- Right (IdentifierCharacters (IdentifierCharacterNonDigit NonDigitHyphen :| []))
--
--
--
-- >>> parse (parseIdentifierCharacters <* eof) "parseIdentifierCharacters" "Abc-123"
-- Right (IdentifierCharacters (IdentifierCharacterNonDigit (NonDigitLetter (AlphaUpper Upper_A)) :| [IdentifierCharacterNonDigit (NonDigitLetter (AlphaLower Lower_b)),IdentifierCharacterNonDigit (NonDigitLetter (AlphaLower Lower_c)),IdentifierCharacterNonDigit NonDigitHyphen,IdentifierCharacterDigit DecDigit1,IdentifierCharacterDigit DecDigit2,IdentifierCharacterDigit DecDigit3]))
--
--
--
-- >>> parse (parseIdentifierCharacters <* eof) "parseIdentifierCharacters" "Ab-c-12--3"
-- Right (IdentifierCharacters (IdentifierCharacterNonDigit (NonDigitLetter (AlphaUpper Upper_A)) :| [IdentifierCharacterNonDigit (NonDigitLetter (AlphaLower Lower_b)),IdentifierCharacterNonDigit NonDigitHyphen,IdentifierCharacterNonDigit (NonDigitLetter (AlphaLower Lower_c)),IdentifierCharacterNonDigit NonDigitHyphen,IdentifierCharacterDigit DecDigit1,IdentifierCharacterDigit DecDigit2,IdentifierCharacterNonDigit NonDigitHyphen,IdentifierCharacterNonDigit NonDigitHyphen,IdentifierCharacterDigit DecDigit3]))
--
--
--
-- >>> parse parseIdentifierCharacters "parseIdentifierCharacters" "ABC+"
-- Right (IdentifierCharacters (IdentifierCharacterNonDigit (NonDigitLetter (AlphaUpper Upper_A)) :| [IdentifierCharacterNonDigit (NonDigitLetter (AlphaUpper Upper_B)),IdentifierCharacterNonDigit (NonDigitLetter (AlphaUpper Upper_C))]))
--
--
--
-- >>> isLeft (parse parseIdentifierCharacters "parseIdentifierCharacters" "+")
-- True
--
parseIdentifierCharacters :: CharParsing p => p IdentifierCharacters
instance GHC.Show.Show Data.SemanticVersion.IdentifierCharacters.IdentifierCharacters
instance GHC.Classes.Eq Data.SemanticVersion.IdentifierCharacters.IdentifierCharacters
instance Data.SemanticVersion.IdentifierCharacters.AsIdentifierCharacters Data.SemanticVersion.IdentifierCharacters.IdentifierCharacters
instance Data.SemanticVersion.IdentifierCharacters.HasIdentifierCharacters Data.SemanticVersion.IdentifierCharacters.IdentifierCharacters
instance (Data.SemanticVersion.IdentifierCharacters.IdentifierCharacters GHC.Types.~ t) => Control.Lens.Wrapped.Rewrapped Data.SemanticVersion.IdentifierCharacters.IdentifierCharacters t
instance Control.Lens.Wrapped.Wrapped Data.SemanticVersion.IdentifierCharacters.IdentifierCharacters
module Data.SemanticVersion.AlphanumericIdentifier
data AlphanumericIdentifier
AlphanumericIdentifierNonDigit :: NonDigit -> AlphanumericIdentifier
AlphanumericIdentifierNonDigits :: NonDigit -> IdentifierCharacters -> AlphanumericIdentifier
AlphanumericIdentifierCharacters :: IdentifierCharacters -> NonDigit -> AlphanumericIdentifier
AlphanumericIdentifierCharacters2 :: IdentifierCharacters -> NonDigit -> IdentifierCharacters -> AlphanumericIdentifier
class HasAlphanumericIdentifier a
alphanumericIdentifier :: HasAlphanumericIdentifier a => Lens' a AlphanumericIdentifier
class AsAlphanumericIdentifier a
_AlphanumericIdentifier :: AsAlphanumericIdentifier a => Prism' a AlphanumericIdentifier
_AlphanumericIdentifierNonDigit :: AsAlphanumericIdentifier a => Prism' a NonDigit
_AlphanumericIdentifierNonDigits :: AsAlphanumericIdentifier a => Prism' a (NonDigit, IdentifierCharacters)
_AlphanumericIdentifierCharacters :: AsAlphanumericIdentifier a => Prism' a (IdentifierCharacters, NonDigit)
_AlphanumericIdentifierCharacters2 :: AsAlphanumericIdentifier a => Prism' a (IdentifierCharacters, NonDigit, IdentifierCharacters)
-- |
-- >>> parse (parseAlphanumericIdentifier <* eof) "parseAlphanumericIdentifier" "A"
-- Right (AlphanumericIdentifierNonDigit (NonDigitLetter (AlphaUpper Upper_A)))
--
--
--
-- >>> isLeft (parse parseAlphanumericIdentifier "parseAlphanumericIdentifier" "")
-- True
--
--
--
-- >>> parse (parseAlphanumericIdentifier <* eof) "parseAlphanumericIdentifier" "Abc-123--XYZ"
-- Right (AlphanumericIdentifierNonDigits (NonDigitLetter (AlphaUpper Upper_A)) (IdentifierCharacters (IdentifierCharacterNonDigit (NonDigitLetter (AlphaLower Lower_b)) :| [IdentifierCharacterNonDigit (NonDigitLetter (AlphaLower Lower_c)),IdentifierCharacterNonDigit NonDigitHyphen,IdentifierCharacterDigit DecDigit1,IdentifierCharacterDigit DecDigit2,IdentifierCharacterDigit DecDigit3,IdentifierCharacterNonDigit NonDigitHyphen,IdentifierCharacterNonDigit NonDigitHyphen,IdentifierCharacterNonDigit (NonDigitLetter (AlphaUpper Upper_X)),IdentifierCharacterNonDigit (NonDigitLetter (AlphaUpper Upper_Y)),IdentifierCharacterNonDigit (NonDigitLetter (AlphaUpper Upper_Z))])))
--
--
--
-- >>> isLeft (parse parseAlphanumericIdentifier "parseAlphanumericIdentifier" "+")
-- True
--
--
--
-- >>> isLeft (parse parseAlphanumericIdentifier "parseAlphanumericIdentifier" "0")
-- True
--
--
--
-- >>> isLeft (parse parseAlphanumericIdentifier "parseAlphanumericIdentifier" "0+")
-- True
--
--
--
-- >>> parse (parseAlphanumericIdentifier <* eof) "parseAlphanumericIdentifier" "0a"
-- Right (AlphanumericIdentifierCharacters (IdentifierCharacters (IdentifierCharacterDigit DecDigit0 :| [])) (NonDigitLetter (AlphaLower Lower_a)))
--
--
--
-- >>> parse parseAlphanumericIdentifier "parseAlphanumericIdentifier" "-"
-- Right (AlphanumericIdentifierNonDigit NonDigitHyphen)
--
--
--
-- >>> parse parseAlphanumericIdentifier "parseAlphanumericIdentifier" "Abc-123--XYZ+"
-- Right (AlphanumericIdentifierNonDigits (NonDigitLetter (AlphaUpper Upper_A)) (IdentifierCharacters (IdentifierCharacterNonDigit (NonDigitLetter (AlphaLower Lower_b)) :| [IdentifierCharacterNonDigit (NonDigitLetter (AlphaLower Lower_c)),IdentifierCharacterNonDigit NonDigitHyphen,IdentifierCharacterDigit DecDigit1,IdentifierCharacterDigit DecDigit2,IdentifierCharacterDigit DecDigit3,IdentifierCharacterNonDigit NonDigitHyphen,IdentifierCharacterNonDigit NonDigitHyphen,IdentifierCharacterNonDigit (NonDigitLetter (AlphaUpper Upper_X)),IdentifierCharacterNonDigit (NonDigitLetter (AlphaUpper Upper_Y)),IdentifierCharacterNonDigit (NonDigitLetter (AlphaUpper Upper_Z))])))
--
parseAlphanumericIdentifier :: CharParsing p => p AlphanumericIdentifier
instance GHC.Show.Show Data.SemanticVersion.AlphanumericIdentifier.AlphanumericIdentifier
instance GHC.Classes.Eq Data.SemanticVersion.AlphanumericIdentifier.AlphanumericIdentifier
instance Data.SemanticVersion.AlphanumericIdentifier.AsAlphanumericIdentifier Data.SemanticVersion.AlphanumericIdentifier.AlphanumericIdentifier
instance Data.SemanticVersion.AlphanumericIdentifier.HasAlphanumericIdentifier Data.SemanticVersion.AlphanumericIdentifier.AlphanumericIdentifier
instance Data.SemanticVersion.NonDigit.HasNonDigit Data.SemanticVersion.AlphanumericIdentifier.AlphanumericIdentifier
module Data.SemanticVersion.BuildIdentifier
data BuildIdentifier
BuildIdentifierAlphanumeric :: AlphanumericIdentifier -> BuildIdentifier
BuildIdentifierDigits :: NonEmpty DecDigit -> BuildIdentifier
class HasBuildIdentifier a
buildIdentifier :: HasBuildIdentifier a => Lens' a BuildIdentifier
class AsBuildIdentifier a
_BuildIdentifier :: AsBuildIdentifier a => Prism' a BuildIdentifier
_BuildIdentifierDigits :: AsBuildIdentifier a => Prism' a (NonEmpty DecDigit)
-- |
-- >>> parse (parseBuildIdentifier <* eof) "parseBuildIdentifier" "A"
-- Right (BuildIdentifierAlphanumeric (AlphanumericIdentifierNonDigit (NonDigitLetter (AlphaUpper Upper_A))))
--
--
--
-- >>> isLeft (parse parseBuildIdentifier "parseBuildIdentifier" "")
-- True
--
--
--
-- >>> parse (parseBuildIdentifier <* eof) "parseBuildIdentifier" "Abc-123--XYZ"
-- Right (BuildIdentifierAlphanumeric (AlphanumericIdentifierNonDigits (NonDigitLetter (AlphaUpper Upper_A)) (IdentifierCharacters (IdentifierCharacterNonDigit (NonDigitLetter (AlphaLower Lower_b)) :| [IdentifierCharacterNonDigit (NonDigitLetter (AlphaLower Lower_c)),IdentifierCharacterNonDigit NonDigitHyphen,IdentifierCharacterDigit DecDigit1,IdentifierCharacterDigit DecDigit2,IdentifierCharacterDigit DecDigit3,IdentifierCharacterNonDigit NonDigitHyphen,IdentifierCharacterNonDigit NonDigitHyphen,IdentifierCharacterNonDigit (NonDigitLetter (AlphaUpper Upper_X)),IdentifierCharacterNonDigit (NonDigitLetter (AlphaUpper Upper_Y)),IdentifierCharacterNonDigit (NonDigitLetter (AlphaUpper Upper_Z))]))))
--
--
--
-- >>> isLeft (parse parseBuildIdentifier "parseBuildIdentifier" "+")
-- True
--
--
--
-- >>> parse parseBuildIdentifier "parseBuildIdentifier" "0"
-- Right (BuildIdentifierDigits (DecDigit0 :| []))
--
--
--
-- >>> parse parseBuildIdentifier "parseBuildIdentifier" "0+"
-- Right (BuildIdentifierDigits (DecDigit0 :| []))
--
--
--
-- >>> parse (parseBuildIdentifier <* eof) "parseBuildIdentifier" "0a"
-- Right (BuildIdentifierAlphanumeric (AlphanumericIdentifierCharacters (IdentifierCharacters (IdentifierCharacterDigit DecDigit0 :| [])) (NonDigitLetter (AlphaLower Lower_a))))
--
--
--
-- >>> parse parseBuildIdentifier "parseBuildIdentifier" "-"
-- Right (BuildIdentifierAlphanumeric (AlphanumericIdentifierNonDigit NonDigitHyphen))
--
--
--
-- >>> parse parseBuildIdentifier "parseBuildIdentifier" "Abc-123--XYZ+"
-- Right (BuildIdentifierAlphanumeric (AlphanumericIdentifierNonDigits (NonDigitLetter (AlphaUpper Upper_A)) (IdentifierCharacters (IdentifierCharacterNonDigit (NonDigitLetter (AlphaLower Lower_b)) :| [IdentifierCharacterNonDigit (NonDigitLetter (AlphaLower Lower_c)),IdentifierCharacterNonDigit NonDigitHyphen,IdentifierCharacterDigit DecDigit1,IdentifierCharacterDigit DecDigit2,IdentifierCharacterDigit DecDigit3,IdentifierCharacterNonDigit NonDigitHyphen,IdentifierCharacterNonDigit NonDigitHyphen,IdentifierCharacterNonDigit (NonDigitLetter (AlphaUpper Upper_X)),IdentifierCharacterNonDigit (NonDigitLetter (AlphaUpper Upper_Y)),IdentifierCharacterNonDigit (NonDigitLetter (AlphaUpper Upper_Z))]))))
--
--
--
-- >>> parse parseBuildIdentifier "parseBuildIdentifier" "0901010"
-- Right (BuildIdentifierDigits (DecDigit0 :| [DecDigit9,DecDigit0,DecDigit1,DecDigit0,DecDigit1,DecDigit0]))
--
--
--
-- >>> parse parseBuildIdentifier "parseBuildIdentifier" "90109010"
-- Right (BuildIdentifierDigits (DecDigit9 :| [DecDigit0,DecDigit1,DecDigit0,DecDigit9,DecDigit0,DecDigit1,DecDigit0]))
--
parseBuildIdentifier :: CharParsing p => p BuildIdentifier
instance GHC.Show.Show Data.SemanticVersion.BuildIdentifier.BuildIdentifier
instance GHC.Classes.Eq Data.SemanticVersion.BuildIdentifier.BuildIdentifier
instance Data.SemanticVersion.BuildIdentifier.AsBuildIdentifier Data.SemanticVersion.BuildIdentifier.BuildIdentifier
instance Data.SemanticVersion.BuildIdentifier.HasBuildIdentifier Data.SemanticVersion.BuildIdentifier.BuildIdentifier
instance Data.SemanticVersion.AlphanumericIdentifier.AsAlphanumericIdentifier Data.SemanticVersion.BuildIdentifier.BuildIdentifier
module Data.SemanticVersion.BuildIdentifiers
newtype BuildIdentifiers
BuildIdentifiers :: NonEmpty BuildIdentifier -> BuildIdentifiers
class HasBuildIdentifiers a
buildIdentifiers :: HasBuildIdentifiers a => Lens' a BuildIdentifiers
class AsBuildIdentifiers a
_BuildIdentifiers :: AsBuildIdentifiers a => Prism' a BuildIdentifiers
parseBuildIdentifiers :: CharParsing p => p BuildIdentifiers
instance GHC.Show.Show Data.SemanticVersion.BuildIdentifiers.BuildIdentifiers
instance GHC.Classes.Eq Data.SemanticVersion.BuildIdentifiers.BuildIdentifiers
instance Data.SemanticVersion.BuildIdentifiers.AsBuildIdentifiers Data.SemanticVersion.BuildIdentifiers.BuildIdentifiers
instance Data.SemanticVersion.BuildIdentifiers.HasBuildIdentifiers Data.SemanticVersion.BuildIdentifiers.BuildIdentifiers
instance (Data.SemanticVersion.BuildIdentifiers.BuildIdentifiers GHC.Types.~ t) => Control.Lens.Wrapped.Rewrapped Data.SemanticVersion.BuildIdentifiers.BuildIdentifiers t
instance Control.Lens.Wrapped.Wrapped Data.SemanticVersion.BuildIdentifiers.BuildIdentifiers
module Data.SemanticVersion.NumericIdentifier
data NumericIdentifier
NumericIdentifierZero :: NumericIdentifier
NumericIdentifierDigits :: DecDigitNoZero -> [DecDigit] -> NumericIdentifier
class HasNumericIdentifier a
numericIdentifier :: HasNumericIdentifier a => Lens' a NumericIdentifier
class AsNumericIdentifier a
_NumericIdentifier :: AsNumericIdentifier a => Prism' a NumericIdentifier
_NumericIdentifierZero :: AsNumericIdentifier a => Prism' a ()
_NumericIdentifierDigits :: AsNumericIdentifier a => Prism' a (DecDigitNoZero, [DecDigit])
-- |
-- >>> parse (parseNumericIdentifier <* eof) "parseNumericIdentifier" "0"
-- Right NumericIdentifierZero
--
--
--
-- >>> isLeft (parse parseNumericIdentifier "parseNumericIdentifier" "")
-- True
--
--
--
-- >>> parse parseNumericIdentifier "parseNumericIdentifier" "01"
-- Right NumericIdentifierZero
--
--
--
-- >>> parse parseNumericIdentifier "parseNumericIdentifier" "10"
-- Right (NumericIdentifierDigits DecDigitNoZero1 [DecDigit0])
--
--
--
-- >>> parse parseNumericIdentifier "parseNumericIdentifier" "38012"
-- Right (NumericIdentifierDigits DecDigitNoZero3 [DecDigit8,DecDigit0,DecDigit1,DecDigit2])
--
--
--
-- >>> isLeft (parse parseNumericIdentifier "parseNumericIdentifier" "a")
-- True
--
--
--
-- >>> isLeft (parse parseNumericIdentifier "parseNumericIdentifier" "-")
-- True
--
parseNumericIdentifier :: CharParsing p => p NumericIdentifier
instance GHC.Show.Show Data.SemanticVersion.NumericIdentifier.NumericIdentifier
instance GHC.Classes.Eq Data.SemanticVersion.NumericIdentifier.NumericIdentifier
instance Data.SemanticVersion.NumericIdentifier.AsNumericIdentifier Data.SemanticVersion.NumericIdentifier.NumericIdentifier
instance Data.SemanticVersion.NumericIdentifier.HasNumericIdentifier Data.SemanticVersion.NumericIdentifier.NumericIdentifier
module Data.SemanticVersion.PreReleaseIdentifier
data PreReleaseIdentifier
PreReleaseIdentifierAlphanumeric :: AlphanumericIdentifier -> PreReleaseIdentifier
PreReleaseIdentifierNumeric :: NumericIdentifier -> PreReleaseIdentifier
class HasPreReleaseIdentifier a
preReleaseIdentifier :: HasPreReleaseIdentifier a => Lens' a PreReleaseIdentifier
class AsPreReleaseIdentifier a
_PreReleaseIdentifier :: AsPreReleaseIdentifier a => Prism' a PreReleaseIdentifier
-- |
-- >>> parse (parsePreReleaseIdentifier <* eof) "parsePreReleaseIdentifier" "A"
-- Right (PreReleaseIdentifierAlphanumeric (AlphanumericIdentifierNonDigit (NonDigitLetter (AlphaUpper Upper_A))))
--
--
--
-- >>> isLeft (parse parsePreReleaseIdentifier "parsePreReleaseIdentifier" "")
-- True
--
--
--
-- >>> parse (parsePreReleaseIdentifier <* eof) "parsePreReleaseIdentifier" "Abc-123--XYZ"
-- Right (PreReleaseIdentifierAlphanumeric (AlphanumericIdentifierNonDigits (NonDigitLetter (AlphaUpper Upper_A)) (IdentifierCharacters (IdentifierCharacterNonDigit (NonDigitLetter (AlphaLower Lower_b)) :| [IdentifierCharacterNonDigit (NonDigitLetter (AlphaLower Lower_c)),IdentifierCharacterNonDigit NonDigitHyphen,IdentifierCharacterDigit DecDigit1,IdentifierCharacterDigit DecDigit2,IdentifierCharacterDigit DecDigit3,IdentifierCharacterNonDigit NonDigitHyphen,IdentifierCharacterNonDigit NonDigitHyphen,IdentifierCharacterNonDigit (NonDigitLetter (AlphaUpper Upper_X)),IdentifierCharacterNonDigit (NonDigitLetter (AlphaUpper Upper_Y)),IdentifierCharacterNonDigit (NonDigitLetter (AlphaUpper Upper_Z))]))))
--
--
--
-- >>> isLeft (parse parsePreReleaseIdentifier "parsePreReleaseIdentifier" "+")
-- True
--
parsePreReleaseIdentifier :: CharParsing p => p PreReleaseIdentifier
instance GHC.Show.Show Data.SemanticVersion.PreReleaseIdentifier.PreReleaseIdentifier
instance GHC.Classes.Eq Data.SemanticVersion.PreReleaseIdentifier.PreReleaseIdentifier
instance Data.SemanticVersion.PreReleaseIdentifier.AsPreReleaseIdentifier Data.SemanticVersion.PreReleaseIdentifier.PreReleaseIdentifier
instance Data.SemanticVersion.PreReleaseIdentifier.HasPreReleaseIdentifier Data.SemanticVersion.PreReleaseIdentifier.PreReleaseIdentifier
instance Data.SemanticVersion.AlphanumericIdentifier.AsAlphanumericIdentifier Data.SemanticVersion.PreReleaseIdentifier.PreReleaseIdentifier
instance Data.SemanticVersion.NumericIdentifier.AsNumericIdentifier Data.SemanticVersion.PreReleaseIdentifier.PreReleaseIdentifier
module Data.SemanticVersion.PreReleaseIdentifiers
newtype PreReleaseIdentifiers
PreReleaseIdentifiers :: NonEmpty PreReleaseIdentifier -> PreReleaseIdentifiers
class HasPreReleaseIdentifiers a
preReleaseIdentifiers :: HasPreReleaseIdentifiers a => Lens' a PreReleaseIdentifiers
class AsPreReleaseIdentifiers a
_PreReleaseIdentifiers :: AsPreReleaseIdentifiers a => Prism' a PreReleaseIdentifiers
-- |
-- >>> parse (parsePreReleaseIdentifiers <* eof) "parsePreReleaseIdentifiers" "A"
-- Right (PreReleaseIdentifiers (PreReleaseIdentifierAlphanumeric (AlphanumericIdentifierNonDigit (NonDigitLetter (AlphaUpper Upper_A))) :| []))
--
--
--
-- >>> isLeft (parse parsePreReleaseIdentifiers "parsePreReleaseIdentifiers" "")
-- True
--
--
--
-- >>> parse (parsePreReleaseIdentifiers <* eof) "parsePreReleaseIdentifiers" "Abc-123--XYZ"
-- Right (PreReleaseIdentifiers (PreReleaseIdentifierAlphanumeric (AlphanumericIdentifierNonDigits (NonDigitLetter (AlphaUpper Upper_A)) (IdentifierCharacters (IdentifierCharacterNonDigit (NonDigitLetter (AlphaLower Lower_b)) :| [IdentifierCharacterNonDigit (NonDigitLetter (AlphaLower Lower_c)),IdentifierCharacterNonDigit NonDigitHyphen,IdentifierCharacterDigit DecDigit1,IdentifierCharacterDigit DecDigit2,IdentifierCharacterDigit DecDigit3,IdentifierCharacterNonDigit NonDigitHyphen,IdentifierCharacterNonDigit NonDigitHyphen,IdentifierCharacterNonDigit (NonDigitLetter (AlphaUpper Upper_X)),IdentifierCharacterNonDigit (NonDigitLetter (AlphaUpper Upper_Y)),IdentifierCharacterNonDigit (NonDigitLetter (AlphaUpper Upper_Z))]))) :| []))
--
--
--
-- >>> isLeft (parse parsePreReleaseIdentifiers "parsePreReleaseIdentifiers" "+")
-- True
--
--
--
-- >>> parse (parsePreReleaseIdentifiers <* eof) "parsePreReleaseIdentifiers" "Abc-123--XYZ.456.abc"
-- Right (PreReleaseIdentifiers (PreReleaseIdentifierAlphanumeric (AlphanumericIdentifierNonDigits (NonDigitLetter (AlphaUpper Upper_A)) (IdentifierCharacters (IdentifierCharacterNonDigit (NonDigitLetter (AlphaLower Lower_b)) :| [IdentifierCharacterNonDigit (NonDigitLetter (AlphaLower Lower_c)),IdentifierCharacterNonDigit NonDigitHyphen,IdentifierCharacterDigit DecDigit1,IdentifierCharacterDigit DecDigit2,IdentifierCharacterDigit DecDigit3,IdentifierCharacterNonDigit NonDigitHyphen,IdentifierCharacterNonDigit NonDigitHyphen,IdentifierCharacterNonDigit (NonDigitLetter (AlphaUpper Upper_X)),IdentifierCharacterNonDigit (NonDigitLetter (AlphaUpper Upper_Y)),IdentifierCharacterNonDigit (NonDigitLetter (AlphaUpper Upper_Z))]))) :| [PreReleaseIdentifierNumeric (NumericIdentifierDigits DecDigitNoZero4 [DecDigit5,DecDigit6]),PreReleaseIdentifierAlphanumeric (AlphanumericIdentifierNonDigits (NonDigitLetter (AlphaLower Lower_a)) (IdentifierCharacters (IdentifierCharacterNonDigit (NonDigitLetter (AlphaLower Lower_b)) :| [IdentifierCharacterNonDigit (NonDigitLetter (AlphaLower Lower_c))])))]))
--
--
--
-- >>> parse (parsePreReleaseIdentifiers <* eof) "parsePreReleaseIdentifiers" "Abc-123--XYZ.Abc-123--XYZ.Abc-123--XYZ"
-- Right (PreReleaseIdentifiers (PreReleaseIdentifierAlphanumeric (AlphanumericIdentifierNonDigits (NonDigitLetter (AlphaUpper Upper_A)) (IdentifierCharacters (IdentifierCharacterNonDigit (NonDigitLetter (AlphaLower Lower_b)) :| [IdentifierCharacterNonDigit (NonDigitLetter (AlphaLower Lower_c)),IdentifierCharacterNonDigit NonDigitHyphen,IdentifierCharacterDigit DecDigit1,IdentifierCharacterDigit DecDigit2,IdentifierCharacterDigit DecDigit3,IdentifierCharacterNonDigit NonDigitHyphen,IdentifierCharacterNonDigit NonDigitHyphen,IdentifierCharacterNonDigit (NonDigitLetter (AlphaUpper Upper_X)),IdentifierCharacterNonDigit (NonDigitLetter (AlphaUpper Upper_Y)),IdentifierCharacterNonDigit (NonDigitLetter (AlphaUpper Upper_Z))]))) :| [PreReleaseIdentifierAlphanumeric (AlphanumericIdentifierNonDigits (NonDigitLetter (AlphaUpper Upper_A)) (IdentifierCharacters (IdentifierCharacterNonDigit (NonDigitLetter (AlphaLower Lower_b)) :| [IdentifierCharacterNonDigit (NonDigitLetter (AlphaLower Lower_c)),IdentifierCharacterNonDigit NonDigitHyphen,IdentifierCharacterDigit DecDigit1,IdentifierCharacterDigit DecDigit2,IdentifierCharacterDigit DecDigit3,IdentifierCharacterNonDigit NonDigitHyphen,IdentifierCharacterNonDigit NonDigitHyphen,IdentifierCharacterNonDigit (NonDigitLetter (AlphaUpper Upper_X)),IdentifierCharacterNonDigit (NonDigitLetter (AlphaUpper Upper_Y)),IdentifierCharacterNonDigit (NonDigitLetter (AlphaUpper Upper_Z))]))),PreReleaseIdentifierAlphanumeric (AlphanumericIdentifierNonDigits (NonDigitLetter (AlphaUpper Upper_A)) (IdentifierCharacters (IdentifierCharacterNonDigit (NonDigitLetter (AlphaLower Lower_b)) :| [IdentifierCharacterNonDigit (NonDigitLetter (AlphaLower Lower_c)),IdentifierCharacterNonDigit NonDigitHyphen,IdentifierCharacterDigit DecDigit1,IdentifierCharacterDigit DecDigit2,IdentifierCharacterDigit DecDigit3,IdentifierCharacterNonDigit NonDigitHyphen,IdentifierCharacterNonDigit NonDigitHyphen,IdentifierCharacterNonDigit (NonDigitLetter (AlphaUpper Upper_X)),IdentifierCharacterNonDigit (NonDigitLetter (AlphaUpper Upper_Y)),IdentifierCharacterNonDigit (NonDigitLetter (AlphaUpper Upper_Z))])))]))
--
parsePreReleaseIdentifiers :: CharParsing p => p PreReleaseIdentifiers
instance GHC.Show.Show Data.SemanticVersion.PreReleaseIdentifiers.PreReleaseIdentifiers
instance GHC.Classes.Eq Data.SemanticVersion.PreReleaseIdentifiers.PreReleaseIdentifiers
instance Data.SemanticVersion.PreReleaseIdentifiers.AsPreReleaseIdentifiers Data.SemanticVersion.PreReleaseIdentifiers.PreReleaseIdentifiers
instance Data.SemanticVersion.PreReleaseIdentifiers.HasPreReleaseIdentifiers Data.SemanticVersion.PreReleaseIdentifiers.PreReleaseIdentifiers
instance (Data.SemanticVersion.PreReleaseIdentifiers.PreReleaseIdentifiers GHC.Types.~ t) => Control.Lens.Wrapped.Rewrapped Data.SemanticVersion.PreReleaseIdentifiers.PreReleaseIdentifiers t
instance Control.Lens.Wrapped.Wrapped Data.SemanticVersion.PreReleaseIdentifiers.PreReleaseIdentifiers
module Data.SemanticVersion.Version
data Version
Version :: NumericIdentifier -> NumericIdentifier -> NumericIdentifier -> Version
class HasVersion a
version :: HasVersion a => Lens' a Version
versionMajor :: HasVersion a => Lens' a NumericIdentifier
versionMinor :: HasVersion a => Lens' a NumericIdentifier
versionPatch :: HasVersion a => Lens' a NumericIdentifier
class AsVersion a
_Version :: AsVersion a => Prism' a Version
-- |
-- >>> parse (parseVersion <* eof) "parseVersion" "0.0.0"
-- Right (Version NumericIdentifierZero NumericIdentifierZero NumericIdentifierZero)
--
--
--
-- >>> isLeft (parse parseVersion "parseVersion" "")
-- True
--
--
--
-- >>> parse (parseVersion <* eof) "parseVersion" "1.2.3"
-- Right (Version (NumericIdentifierDigits DecDigitNoZero1 []) (NumericIdentifierDigits DecDigitNoZero2 []) (NumericIdentifierDigits DecDigitNoZero3 []))
--
--
--
-- >>> isLeft(parse parseVersion "parseVersion" "01.2.3")
-- True
--
--
--
-- >>> parse (parseVersion <* eof) "parseVersion" "10.2.3"
-- Right (Version (NumericIdentifierDigits DecDigitNoZero1 [DecDigit0]) (NumericIdentifierDigits DecDigitNoZero2 []) (NumericIdentifierDigits DecDigitNoZero3 []))
--
--
--
-- >>> parse (parseVersion <* eof) "parseVersion" "38012.5.6"
-- Right (Version (NumericIdentifierDigits DecDigitNoZero3 [DecDigit8,DecDigit0,DecDigit1,DecDigit2]) (NumericIdentifierDigits DecDigitNoZero5 []) (NumericIdentifierDigits DecDigitNoZero6 []))
--
--
--
-- >>> parse (parseVersion <* eof) "parseVersion" "38012.5.5432"
-- Right (Version (NumericIdentifierDigits DecDigitNoZero3 [DecDigit8,DecDigit0,DecDigit1,DecDigit2]) (NumericIdentifierDigits DecDigitNoZero5 []) (NumericIdentifierDigits DecDigitNoZero5 [DecDigit4,DecDigit3,DecDigit2]))
--
--
--
-- >>> isLeft (parse (parseVersion <* eof) "parseVersion" "38012.05.5432")
-- True
--
--
--
-- >>> isLeft (parse (parseVersion <* eof) "parseVersion" "38012.5.05432")
-- True
--
--
--
-- >>> isLeft (parse parseVersion "parseVersion" "a")
-- True
--
--
--
-- >>> isLeft (parse parseVersion "parseVersion" "-")
-- True
--
parseVersion :: CharParsing p => p Version
instance GHC.Show.Show Data.SemanticVersion.Version.Version
instance GHC.Classes.Eq Data.SemanticVersion.Version.Version
instance Data.SemanticVersion.Version.AsVersion Data.SemanticVersion.Version.Version
instance Data.SemanticVersion.Version.HasVersion Data.SemanticVersion.Version.Version
module Data.SemanticVersion.SemanticVersion
data SemanticVersion
SemanticVersionOnly :: Version -> SemanticVersion
SemanticVersionPreRelease :: Version -> PreReleaseIdentifiers -> SemanticVersion
SemanticVersionBuild :: Version -> BuildIdentifiers -> SemanticVersion
SemanticVersionPreReleaseBuild :: Version -> PreReleaseIdentifiers -> BuildIdentifiers -> SemanticVersion
class HasSemanticVersion a
semanticVersion :: HasSemanticVersion a => Lens' a SemanticVersion
class AsSemanticVersion a
_SemanticVersion :: AsSemanticVersion a => Prism' a SemanticVersion
_SemanticVersionOnly :: AsSemanticVersion a => Prism' a Version
_SemanticVersionPreRelease :: AsSemanticVersion a => Prism' a (Version, PreReleaseIdentifiers)
_SemanticVersionBuild :: AsSemanticVersion a => Prism' a (Version, BuildIdentifiers)
_SemanticVersionPreReleaseBuild :: AsSemanticVersion a => Prism' a (Version, PreReleaseIdentifiers, BuildIdentifiers)
-- |
-- >>> parse (parseSemanticVersion <* eof) "parseSemanticVersion" "0.0.0"
-- Right (SemanticVersion (Version NumericIdentifierZero NumericIdentifierZero NumericIdentifierZero))
--
--
--
-- >>> isLeft (parse parseSemanticVersion "parseSemanticVersion" "")
-- True
--
--
--
-- >>> parse (parseSemanticVersion <* eof) "parseSemanticVersion" "1.2.3"
-- Right (SemanticVersion (Version (NumericIdentifierDigits DecDigitNoZero1 []) (NumericIdentifierDigits DecDigitNoZero2 []) (NumericIdentifierDigits DecDigitNoZero3 [])))
--
--
--
-- >>> isLeft(parse parseSemanticVersion "parseSemanticVersion" "01.2.3")
-- True
--
--
--
-- >>> parse (parseSemanticVersion <* eof) "parseSemanticVersion" "10.2.3"
-- Right (SemanticVersion (Version (NumericIdentifierDigits DecDigitNoZero1 [DecDigit0]) (NumericIdentifierDigits DecDigitNoZero2 []) (NumericIdentifierDigits DecDigitNoZero3 [])))
--
--
--
-- >>> parse (parseSemanticVersion <* eof) "parseSemanticVersion" "38012.5.6"
-- Right (SemanticVersion (Version (NumericIdentifierDigits DecDigitNoZero3 [DecDigit8,DecDigit0,DecDigit1,DecDigit2]) (NumericIdentifierDigits DecDigitNoZero5 []) (NumericIdentifierDigits DecDigitNoZero6 [])))
--
--
--
-- >>> parse (parseSemanticVersion <* eof) "parseSemanticVersion" "38012.5.5432"
-- Right (SemanticVersion (Version (NumericIdentifierDigits DecDigitNoZero3 [DecDigit8,DecDigit0,DecDigit1,DecDigit2]) (NumericIdentifierDigits DecDigitNoZero5 []) (NumericIdentifierDigits DecDigitNoZero5 [DecDigit4,DecDigit3,DecDigit2])))
--
--
--
-- >>> isLeft (parse (parseSemanticVersion <* eof) "parseSemanticVersion" "38012.05.5432")
-- True
--
--
--
-- >>> isLeft (parse (parseSemanticVersion <* eof) "parseSemanticVersion" "38012.5.05432")
-- True
--
--
--
-- >>> isLeft (parse parseSemanticVersion "parseSemanticVersion" "a")
-- True
--
--
--
-- >>> isLeft (parse parseSemanticVersion "parseSemanticVersion" "-")
-- True
--
--
--
-- >>> parse (parseSemanticVersion <* eof) "parseSemanticVersion" "1.0.0-alpha"
-- Right (SemanticVersionPreRelease (Version (NumericIdentifierDigits DecDigitNoZero1 []) NumericIdentifierZero NumericIdentifierZero) (PreReleaseIdentifiers (PreReleaseIdentifierAlphanumeric (AlphanumericIdentifierNonDigits (NonDigitLetter (AlphaLower Lower_a)) (IdentifierCharacters (IdentifierCharacterNonDigit (NonDigitLetter (AlphaLower Lower_l)) :| [IdentifierCharacterNonDigit (NonDigitLetter (AlphaLower Lower_p)),IdentifierCharacterNonDigit (NonDigitLetter (AlphaLower Lower_h)),IdentifierCharacterNonDigit (NonDigitLetter (AlphaLower Lower_a))]))) :| [])))
--
--
--
-- >>> parse (parseSemanticVersion <* eof) "parseSemanticVersion" "1.0.0-alpha.1"
-- Right (SemanticVersionPreRelease (Version (NumericIdentifierDigits DecDigitNoZero1 []) NumericIdentifierZero NumericIdentifierZero) (PreReleaseIdentifiers (PreReleaseIdentifierAlphanumeric (AlphanumericIdentifierNonDigits (NonDigitLetter (AlphaLower Lower_a)) (IdentifierCharacters (IdentifierCharacterNonDigit (NonDigitLetter (AlphaLower Lower_l)) :| [IdentifierCharacterNonDigit (NonDigitLetter (AlphaLower Lower_p)),IdentifierCharacterNonDigit (NonDigitLetter (AlphaLower Lower_h)),IdentifierCharacterNonDigit (NonDigitLetter (AlphaLower Lower_a))]))) :| [PreReleaseIdentifierNumeric (NumericIdentifierDigits DecDigitNoZero1 [])])))
--
--
--
-- >>> parse (parseSemanticVersion <* eof) "parseSemanticVersion" "1.0.0-0.3.7"
-- Right (SemanticVersionPreRelease (Version (NumericIdentifierDigits DecDigitNoZero1 []) NumericIdentifierZero NumericIdentifierZero) (PreReleaseIdentifiers (PreReleaseIdentifierNumeric NumericIdentifierZero :| [PreReleaseIdentifierNumeric (NumericIdentifierDigits DecDigitNoZero3 []),PreReleaseIdentifierNumeric (NumericIdentifierDigits DecDigitNoZero7 [])])))
--
--
--
-- >>> parse (parseSemanticVersion <* eof) "parseSemanticVersion" "1.0.0-x.7.z.92"
-- Right (SemanticVersionPreRelease (Version (NumericIdentifierDigits DecDigitNoZero1 []) NumericIdentifierZero NumericIdentifierZero) (PreReleaseIdentifiers (PreReleaseIdentifierAlphanumeric (AlphanumericIdentifierNonDigit (NonDigitLetter (AlphaLower Lower_x))) :| [PreReleaseIdentifierNumeric (NumericIdentifierDigits DecDigitNoZero7 []),PreReleaseIdentifierAlphanumeric (AlphanumericIdentifierNonDigit (NonDigitLetter (AlphaLower Lower_z))),PreReleaseIdentifierNumeric (NumericIdentifierDigits DecDigitNoZero9 [DecDigit2])])))
--
--
--
-- >>> parse (parseSemanticVersion <* eof) "parseSemanticVersion" "1.0.0-x-y-z.--"
-- Right (SemanticVersionPreRelease (Version (NumericIdentifierDigits DecDigitNoZero1 []) NumericIdentifierZero NumericIdentifierZero) (PreReleaseIdentifiers (PreReleaseIdentifierAlphanumeric (AlphanumericIdentifierNonDigits (NonDigitLetter (AlphaLower Lower_x)) (IdentifierCharacters (IdentifierCharacterNonDigit NonDigitHyphen :| [IdentifierCharacterNonDigit (NonDigitLetter (AlphaLower Lower_y)),IdentifierCharacterNonDigit NonDigitHyphen,IdentifierCharacterNonDigit (NonDigitLetter (AlphaLower Lower_z))]))) :| [PreReleaseIdentifierAlphanumeric (AlphanumericIdentifierNonDigits NonDigitHyphen (IdentifierCharacters (IdentifierCharacterNonDigit NonDigitHyphen :| [])))])))
--
--
--
-- >>> parse (parseSemanticVersion <* eof) "parseSemanticVersion" "1.0.0-alpha+001"
-- Right (SemanticVersionPreReleaseBuild (Version (NumericIdentifierDigits DecDigitNoZero1 []) NumericIdentifierZero NumericIdentifierZero) (PreReleaseIdentifiers (PreReleaseIdentifierAlphanumeric (AlphanumericIdentifierNonDigits (NonDigitLetter (AlphaLower Lower_a)) (IdentifierCharacters (IdentifierCharacterNonDigit (NonDigitLetter (AlphaLower Lower_l)) :| [IdentifierCharacterNonDigit (NonDigitLetter (AlphaLower Lower_p)),IdentifierCharacterNonDigit (NonDigitLetter (AlphaLower Lower_h)),IdentifierCharacterNonDigit (NonDigitLetter (AlphaLower Lower_a))]))) :| [])) (BuildIdentifiers (BuildIdentifierDigits (DecDigit0 :| [DecDigit0,DecDigit1]) :| [])))
--
--
--
-- >>> parse (parseSemanticVersion <* eof) "parseSemanticVersion" "1.0.0+20130313144700"
-- Right (SemanticVersionBuild (Version (NumericIdentifierDigits DecDigitNoZero1 []) NumericIdentifierZero NumericIdentifierZero) (BuildIdentifiers (BuildIdentifierDigits (DecDigit2 :| [DecDigit0,DecDigit1,DecDigit3,DecDigit0,DecDigit3,DecDigit1,DecDigit3,DecDigit1,DecDigit4,DecDigit4,DecDigit7,DecDigit0,DecDigit0]) :| [])))
--
--
--
-- >>> parse (parseSemanticVersion <* eof) "parseSemanticVersion" "1.0.0-beta+exp.sha.5114f85"
-- Right (SemanticVersionPreReleaseBuild (Version (NumericIdentifierDigits DecDigitNoZero1 []) NumericIdentifierZero NumericIdentifierZero) (PreReleaseIdentifiers (PreReleaseIdentifierAlphanumeric (AlphanumericIdentifierNonDigits (NonDigitLetter (AlphaLower Lower_b)) (IdentifierCharacters (IdentifierCharacterNonDigit (NonDigitLetter (AlphaLower Lower_e)) :| [IdentifierCharacterNonDigit (NonDigitLetter (AlphaLower Lower_t)),IdentifierCharacterNonDigit (NonDigitLetter (AlphaLower Lower_a))]))) :| [])) (BuildIdentifiers (BuildIdentifierAlphanumeric (AlphanumericIdentifierNonDigits (NonDigitLetter (AlphaLower Lower_e)) (IdentifierCharacters (IdentifierCharacterNonDigit (NonDigitLetter (AlphaLower Lower_x)) :| [IdentifierCharacterNonDigit (NonDigitLetter (AlphaLower Lower_p))]))) :| [BuildIdentifierAlphanumeric (AlphanumericIdentifierNonDigits (NonDigitLetter (AlphaLower Lower_s)) (IdentifierCharacters (IdentifierCharacterNonDigit (NonDigitLetter (AlphaLower Lower_h)) :| [IdentifierCharacterNonDigit (NonDigitLetter (AlphaLower Lower_a))]))),BuildIdentifierAlphanumeric (AlphanumericIdentifierCharacters2 (IdentifierCharacters (IdentifierCharacterDigit DecDigit5 :| [IdentifierCharacterDigit DecDigit1,IdentifierCharacterDigit DecDigit1,IdentifierCharacterDigit DecDigit4])) (NonDigitLetter (AlphaLower Lower_f)) (IdentifierCharacters (IdentifierCharacterDigit DecDigit8 :| [IdentifierCharacterDigit DecDigit5])))])))
--
--
--
-- >>> parse (parseSemanticVersion <* eof) "parseSemanticVersion" "1.0.0+21AF26D3----117B344092BD"
-- Right (SemanticVersionBuild (Version (NumericIdentifierDigits DecDigitNoZero1 []) NumericIdentifierZero NumericIdentifierZero) (BuildIdentifiers (BuildIdentifierAlphanumeric (AlphanumericIdentifierCharacters2 (IdentifierCharacters (IdentifierCharacterDigit DecDigit2 :| [IdentifierCharacterDigit DecDigit1])) (NonDigitLetter (AlphaUpper Upper_A)) (IdentifierCharacters (IdentifierCharacterNonDigit (NonDigitLetter (AlphaUpper Upper_F)) :| [IdentifierCharacterDigit DecDigit2,IdentifierCharacterDigit DecDigit6,IdentifierCharacterNonDigit (NonDigitLetter (AlphaUpper Upper_D)),IdentifierCharacterDigit DecDigit3,IdentifierCharacterNonDigit NonDigitHyphen,IdentifierCharacterNonDigit NonDigitHyphen,IdentifierCharacterNonDigit NonDigitHyphen,IdentifierCharacterNonDigit NonDigitHyphen,IdentifierCharacterDigit DecDigit1,IdentifierCharacterDigit DecDigit1,IdentifierCharacterDigit DecDigit7,IdentifierCharacterNonDigit (NonDigitLetter (AlphaUpper Upper_B)),IdentifierCharacterDigit DecDigit3,IdentifierCharacterDigit DecDigit4,IdentifierCharacterDigit DecDigit4,IdentifierCharacterDigit DecDigit0,IdentifierCharacterDigit DecDigit9,IdentifierCharacterDigit DecDigit2,IdentifierCharacterNonDigit (NonDigitLetter (AlphaUpper Upper_B)),IdentifierCharacterNonDigit (NonDigitLetter (AlphaUpper Upper_D))]))) :| [])))
--
parseSemanticVersion :: CharParsing p => p SemanticVersion
instance GHC.Show.Show Data.SemanticVersion.SemanticVersion.SemanticVersion
instance GHC.Classes.Eq Data.SemanticVersion.SemanticVersion.SemanticVersion
instance Data.SemanticVersion.SemanticVersion.AsSemanticVersion Data.SemanticVersion.SemanticVersion.SemanticVersion
instance Data.SemanticVersion.SemanticVersion.HasSemanticVersion Data.SemanticVersion.SemanticVersion.SemanticVersion
instance Data.SemanticVersion.Version.HasVersion Data.SemanticVersion.SemanticVersion.SemanticVersion
module Data.SemanticVersion