Lines Matching refs:cBlack
1486 TColor = (cBlack, cRed);
7424 Result := cBlack
7531 if E^.Color = cBlack then
7538 if E^.Color = cBlack then
7662 while (E <> fRoot) and (ColorOf(E) = cBlack) do
7670 SetColor(Sib, cBlack);
7676 if (ColorOf(LeftOf(Sib)) = cBlack) and (ColorOf(RightOf(Sib)) = cBlack) then
7683 if ColorOf(RightOf(Sib)) = cBlack then
7685 SetColor(LeftOf(Sib), cBlack);
7692 SetColor(ParentOf(E), cBlack);
7693 SetColor(RightOf(Sib), cBlack);
7704 SetColor(Sib, cBlack);
7710 if (ColorOf(RightOf(Sib)) = cBlack) and (ColorOf(LeftOf(Sib)) = cBlack) then
7718 if ColorOf(LeftOf(Sib)) = cBlack then
7720 SetColor(RightOf(Sib), cBlack);
7727 SetColor(ParentOf(E), cBlack);
7728 SetColor(LeftOf(Sib), cBlack);
7735 SetColor(E, cBlack);
7752 SetColor(ParentOf(E), cBlack);
7753 SetColor(Y, cBlack);
7764 SetColor(ParentOf(E), cBlack);
7774 SetColor(ParentOf(E), cBlack);
7775 SetColor(Y, cBlack);
7786 SetColor(ParentOf(E), cBlack);
7793 fRoot^.Color := cBlack;