Lines Matching full:ttreepatternlexer
1655 TTreePatternLexer = class(TANTLRObject, ITreePatternLexer)
3851 { TTreePatternLexer }
3853 constructor TTreePatternLexer.Create;
3859 procedure TTreePatternLexer.Consume;
3868 constructor TTreePatternLexer.Create(const APattern: String);
3876 destructor TTreePatternLexer.Destroy;
3882 function TTreePatternLexer.NextToken: Integer;
3968 function TTreePatternLexer.SVal: String;
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
