68 references to PatternType
Microsoft.VisualBasic.Core (68)
Microsoft\VisualBasic\CompilerServices\LikeOperator.vb (68)
901Friend PatType As PatternType 912Debug.Assert(PatType = PatternType.STRING, "Unexpected pattern group type") 916Debug.Assert(PatType = PatternType.STRING, "Unexpected pattern group type") 924Debug.Assert(PatType = PatternType.STRING, "Unexpected pattern group type") 928Debug.Assert(PatType = PatternType.STRING, "Unexpected pattern group type") 942Debug.Assert(PatType = PatternType.STAR OrElse PatType = PatternType.NONE, "Unexpected pattern group type") 946Debug.Assert(PatType = PatternType.STAR OrElse PatType = PatternType.NONE, "Unexpected pattern group type") 958Debug.Assert(PatType = PatternType.EXCLIST OrElse PatType = PatternType.INCLIST, "Unexpected pattern group type") 962Debug.Assert(PatType = PatternType.EXCLIST OrElse PatType = PatternType.INCLIST, "Unexpected pattern group type") 971Debug.Assert(PatType = PatternType.EXCLIST OrElse PatType = PatternType.INCLIST, "Unexpected pattern group type") 975Debug.Assert(PatType = PatternType.EXCLIST OrElse PatType = PatternType.INCLIST, "Unexpected pattern group type") 1037Dim PrevPatType As PatternType = PatternType.NONE 1057If PrevPatType <> PatternType.STAR Then 1058PrevPatType = PatternType.STAR 1059PatternGroups(PGIndex).PatType = PatternType.STAR 1080PrevPatType = PatternType.EXCLIST 1082PrevPatType = PatternType.INCLIST 1093If PrevPatType = PatternType.DIGIT Then 1096PatternGroups(PGIndex).PatType = PatternType.DIGIT 1099PrevPatType = PatternType.DIGIT 1104If PrevPatType = PatternType.ANYCHAR Then 1107PatternGroups(PGIndex).PatType = PatternType.ANYCHAR 1110PrevPatType = PatternType.ANYCHAR 1123If PrevPatType = PatternType.STRING Then 1127PatternGroups(PGIndex).PatType = PatternType.STRING 1133PrevPatType = PatternType.STRING 1144PatternGroups(PGIndex).PatType = PatternType.NONE 1152Case PatternType.STRING 1155Case PatternType.DIGIT, PatternType.ANYCHAR 1158Case PatternType.EXCLIST, PatternType.INCLIST 1161Case PatternType.STAR, PatternType.NONE 1231PatternGroups(0).PatType = PatternType.STAR, "Pattern parsing failed") 1236If PatternGroups(PGIndexForLastAsterisk + 1).PatType <> PatternType.NONE Then 1249Loop While PatternGroups(PGIndex).PatType <> PatternType.NONE 1281Debug.Assert(PatternGroups(PGIndex).PatType = PatternType.NONE, "Unexpected pattern end") 1297Case PatternType.STRING 1300Case PatternType.DIGIT, PatternType.ANYCHAR 1303Case PatternType.EXCLIST, PatternType.INCLIST 1306Case PatternType.STAR, PatternType.NONE 1356Debug.Assert(PatternGroups(PGIndex).PatType = PatternType.STAR, "Unexpected start of pattern groups list") 1367Case PatternType.STRING 1424Case PatternType.DIGIT 1448Case PatternType.EXCLIST, PatternType.INCLIST 1475Case PatternType.ANYCHAR 1494Case PatternType.NONE 1505If PatternGroups(PGPrevMismatchIndex).PatType <> PatternType.STAR AndAlso 1506PatternGroups(PGPrevMismatchIndex).PatType <> PatternType.NONE Then 1512Case PatternType.STAR 1524Debug.Assert(PatternGroups(PGPrevMismatchIndex).PatType <> PatternType.NONE, "Bad previous mismatch index") 1526If PatternGroups(PGPrevMismatchIndex).PatType <> PatternType.STAR Then 1541Loop While PatternGroups(PGIndex).PatType <> PatternType.STAR 1605Debug.Assert(PG.PatType = PatternType.EXCLIST OrElse PG.PatType = PatternType.INCLIST, "Unexpected pattern group") 1686If PG.PatType = PatternType.EXCLIST Then