Lines Matching refs:Root
221 Root, R0, C0, C1, C2: ICommonTree;
223 // Add child ^(nil 101 102 103) to root ^(5 6)
225 Root := TCommonTree.Create(TCommonToken.Create(5));
226 Root.AddChild(TCommonTree.Create(TCommonToken.Create(6)));
237 Root.AddChild(R0);
239 CheckNull(Root.Parent);
240 CheckEquals(Root.ChildIndex, -1);
242 // check children of root all point at root
243 Check(C0.Parent = Root);
245 Check(C1.Parent = Root);
247 Check(C2.Parent = Root);
256 // 5 becomes new root of ^(nil 101 102 103)
272 // 5 becomes new root of ^(101 102 103)
287 // ^(nil 5) becomes new root of ^(nil 101 102 103)
304 // ^(nil 5) becomes new root of ^(101 102 103)
380 Root, R0, C0, C1, C2: ICommonTree;
382 // Add child ^(nil 101 102 103) to root 5
384 Root := TCommonTree.Create(TClassicToken.Create(5));
395 Root.AddChild(R0);
397 CheckNull(Root.Parent);
398 CheckEquals(Root.ChildIndex, -1);
400 // check children of root all point at root
401 Check(C0.Parent = Root);
403 Check(C1.Parent = Root);
405 Check(C2.Parent = Root);
766 Root: ITree;
769 Root := TCommonTree.Create(IToken(nil));
770 Root.AddChild(TCommonTree.Create(TCommonToken.Create(101)));
771 Root.AddChild(TCommonTree.Create(TCommonToken.Create(102)));
772 Root.AddChild(TCommonTree.Create(TCommonToken.Create(103)));
774 Stream := CreateCommonTreeNodeStream(Root);
781 Root, T, U: ITree;
784 Root := TCommonTree.Create(IToken(nil));
793 Root.AddChild(T);
794 Root.AddChild(U);
796 Stream := CreateCommonTreeNodeStream(Root);
803 Root: ITree;
806 Root := TCommonTree.Create(IToken(nil));
807 Root.AddChild(TCommonTree.Create(TCommonToken.Create(101)));
809 Stream := CreateCommonTreeNodeStream(Root);
