pSoftwareVersion :: Lexer SoftwareVersion
pSoftwareVersion = do
    appName <- manyTill (satisfy isAlphaNum <|> char '-') (char ':')
    let svAppName = ApplicationName (toText appName)
    svNumber <- decimal
    notFollowedBy $ char '.'
    return SoftwareVersion {..}
pSoftwareVersion :: Lexer SoftwareVersion
pSoftwareVersion = do
    appName <- manyTill (satisfy isAlphaNum <|> char '-') (char ':')
    let svAppName = ApplicationName (toText appName)
    svNumber <- decimal
    notFollowedBy $ char '.'
    return SoftwareVersion {..}
pSoftwareVersion = do
    appName <- manyTill (satisfy isAlphaNum <|> char '-') (char ':')
    let svAppName = ApplicationName (toText appName)
    svNumber <- decimal
    notFollowedBy $ char '.'
    return SoftwareVersion {..}