Lines Matching refs:TreePattern

4036   TreePattern: ITreePattern;
4045   TreePattern := Parser.Pattern as ITreePattern;
4048   if (TreePattern = nil) or (TreePattern.IsNil)
4049     or Supports(TreePattern, IWildcardTreePattern)
4053   RootTokenType := TreePattern.TokenType;
4054   Visitor := TPatternMatchingContextVisitor.Create(Self, TreePattern, Result);
4103   TreePattern: ITreePattern;
4107   TreePattern := Parser.Pattern as ITreePattern;
4108   Result := _Parse(T, TreePattern, Labels);
4116   TreePattern: ITreePattern;
4123   TreePattern := Parser.Pattern as ITreePattern;
4124   if (TreePattern = nil) or (TreePattern.IsNil)
4125     or Supports(TreePattern, IWildcardTreePattern)
4128   RootTokenType := TreePattern.TokenType;
4129   PatternVisitor := TInvokeVisitorOnPatternMatchContextVisitor.Create(Self, TreePattern, Visitor);