anchor.diff:      [Test]
       [Ignore]
       procedure year_divisible_by_400_leap_year;
  +
  +    [Test]
  +    [Ignore]
  +    procedure year_divisible_by_200_not_divisible_by_400_common_year;
     end;
   
   implementation
  
positive.code:   assert.IsFalse(TYear.IsLeap(2100), 'Expected ''false'', 2100 is not a leap year.');
  end;
  
  procedure YearTest.year_divisible_by_400_leap_year;
  begin
    assert.IsTrue(TYear.IsLeap(2000), 'Expected ''true'', 2000 is a leap year.');
  
negative.code:   DUnitX.TestFramework;
  
  const
    CanonicalVersion = '1.4.0';
  
  type
  
  