Lines Matching refs:T1
1026 function Equals(const T1, T2: IANTLRInterface): Boolean; overload;
1029 /// Compare t1 and t2; return true if token types/text, structure match exactly.
1040 function Equals(const T1, T2: IANTLRInterface; const Adaptor: ITreeAdaptor): Boolean; overload;
1816 function Equals(const T1, T2: IANTLRInterface): Boolean; reintroduce; overload;
1817 function Equals(const T1, T2: IANTLRInterface;
1820 function _Parse(const T1: IANTLRInterface; const T2: ITreePattern;
1831 class function _Equals(const T1, T2: IANTLRInterface;
4020 function TTreeWizard.Equals(const T1, T2: IANTLRInterface;
4023 Result := _Equals(T1, T2, Adaptor);
4026 function TTreeWizard.Equals(const T1, T2: IANTLRInterface): Boolean;
4028 Result := _Equals(T1, T2, FAdaptor);
4133 class function TTreeWizard._Equals(const T1, T2: IANTLRInterface;
4140 if (T1 = nil) or (T2 = nil) then
4144 if (Adaptor.GetNodeType(T1) <> Adaptor.GetNodeType(T2)) then
4146 if (Adaptor.GetNodeText(T1) <> Adaptor.GetNodeText(T2)) then
4150 N1 := Adaptor.GetChildCount(T1);
4156 Child1 := Adaptor.GetChild(T1, I);
4187 function TTreeWizard._Parse(const T1: IANTLRInterface; const T2: ITreePattern;
4195 if (T1 = nil) or (T2 = nil) then
4201 if (FAdaptor.GetNodeType(T1) <> T2.TokenType) then
4203 if (T2.HasTextArg) and (FAdaptor.GetNodeText(T1) <> T2.Text) then
4208 // map label in pattern to node in t1
4209 Labels.AddOrSetValue(T2.TokenLabel, T1);
4212 N1 := FAdaptor.GetChildCount(T1);
4219 Child1 := FAdaptor.GetChild(T1, I);
