Lines Matching refs:TTreePatternLexer
1655 TTreePatternLexer = class(TANTLRObject, ITreePatternLexer) class
3853 constructor TTreePatternLexer.Create;
3859 procedure TTreePatternLexer.Consume;
3868 constructor TTreePatternLexer.Create(const APattern: String);
3876 destructor TTreePatternLexer.Destroy;
3882 function TTreePatternLexer.NextToken: Integer; in TTreePatternLexer.NextToken()
3968 function TTreePatternLexer.SVal: String; in TTreePatternLexer.SVal()
4015 Tokenizer := TTreePatternLexer.Create(Pattern);
4043 Tokenizer := TTreePatternLexer.Create(Pattern);
4105 Tokenizer := TTreePatternLexer.Create(Pattern);
4121 Tokenizer := TTreePatternLexer.Create(Pattern);
4275 if (FTokenType = TTreePatternLexer.PERCENT) then
4278 if (FTokenType <> TTreePatternLexer.ID) then
4282 if (FTokenType <> TTreePatternLexer.COLON) then
4288 if (FTokenType = TTreePatternLexer.DOT) then
4299 if (FTokenType <> TTreePatternLexer.ID) then
4309 if (FTokenType = TTreePatternLexer.ARG) then
4332 if (FTokenType <> TTreePatternLexer.START) then
4343 while (FTokenType in [TTreePatternLexer.START, TTreePatternLexer.ID,
4344 TTreePatternLexer.PERCENT, TTreePatternLexer.DOT]) do
4346 if (FTokenType = TTreePatternLexer.START) then
4360 if (FTokenType <> TTreePatternLexer.STOP) then
4373 if (FTokenType = TTreePatternLexer.START) then
4376 if (FTokenType = TTreePatternLexer.ID) then
4379 if (FTokenType = TTreePatternLexer.EOF) then