6 writes to PatType
Microsoft.VisualBasic.Core (6)
Microsoft\VisualBasic\CompilerServices\LikeOperator.vb (6)
1059
PatternGroups(PGIndex).
PatType
= PatternType.STAR
1085
PatternGroups(PGIndex).
PatType
= PrevPatType
1096
PatternGroups(PGIndex).
PatType
= PatternType.DIGIT
1107
PatternGroups(PGIndex).
PatType
= PatternType.ANYCHAR
1127
PatternGroups(PGIndex).
PatType
= PatternType.STRING
1144
PatternGroups(PGIndex).
PatType
= PatternType.NONE
32 references to PatType
Microsoft.VisualBasic.Core (32)
Microsoft\VisualBasic\CompilerServices\LikeOperator.vb (32)
912
Debug.Assert(
PatType
= PatternType.STRING, "Unexpected pattern group type")
916
Debug.Assert(
PatType
= PatternType.STRING, "Unexpected pattern group type")
924
Debug.Assert(
PatType
= PatternType.STRING, "Unexpected pattern group type")
928
Debug.Assert(
PatType
= PatternType.STRING, "Unexpected pattern group type")
942
Debug.Assert(
PatType
= PatternType.STAR OrElse
PatType
= PatternType.NONE, "Unexpected pattern group type")
946
Debug.Assert(
PatType
= PatternType.STAR OrElse
PatType
= PatternType.NONE, "Unexpected pattern group type")
958
Debug.Assert(
PatType
= PatternType.EXCLIST OrElse
PatType
= PatternType.INCLIST, "Unexpected pattern group type")
962
Debug.Assert(
PatType
= PatternType.EXCLIST OrElse
PatType
= PatternType.INCLIST, "Unexpected pattern group type")
971
Debug.Assert(
PatType
= PatternType.EXCLIST OrElse
PatType
= PatternType.INCLIST, "Unexpected pattern group type")
975
Debug.Assert(
PatType
= PatternType.EXCLIST OrElse
PatType
= PatternType.INCLIST, "Unexpected pattern group type")
1151
Select Case PatternGroups(PGIndex).
PatType
1231
PatternGroups(0).
PatType
= PatternType.STAR, "Pattern parsing failed")
1236
If PatternGroups(PGIndexForLastAsterisk + 1).
PatType
<> PatternType.NONE Then
1249
Loop While PatternGroups(PGIndex).
PatType
<> PatternType.NONE
1281
Debug.Assert(PatternGroups(PGIndex).
PatType
= PatternType.NONE, "Unexpected pattern end")
1296
Select Case PatternGroups(PGIndex).
PatType
1356
Debug.Assert(PatternGroups(PGIndex).
PatType
= PatternType.STAR, "Unexpected start of pattern groups list")
1365
Select Case PGCurrent.
PatType
1505
If PatternGroups(PGPrevMismatchIndex).
PatType
<> PatternType.STAR AndAlso
1506
PatternGroups(PGPrevMismatchIndex).
PatType
<> PatternType.NONE Then
1524
Debug.Assert(PatternGroups(PGPrevMismatchIndex).
PatType
<> PatternType.NONE, "Bad previous mismatch index")
1526
If PatternGroups(PGPrevMismatchIndex).
PatType
<> PatternType.STAR Then
1541
Loop While PatternGroups(PGIndex).
PatType
<> PatternType.STAR
1605
Debug.Assert(PG.
PatType
= PatternType.EXCLIST OrElse PG.
PatType
= PatternType.INCLIST, "Unexpected pattern group")
1686
If PG.
PatType
= PatternType.EXCLIST Then