anchor.diff:  uses
     DUnitX.TestFramework;
   
  +const
  +  CanonicalVersion = '1.1.0';
  +
   type
     [TestFixture]
     RnaTranscriptionTest = class(TObject)
     public
       [Test]
  -//  [Ignore('Comment the "[Ignore]" statement to run the test')]
  +//    [Ignore('Comment the "[Ignore]" statement to run the test')]
       procedure Rna_complement_of_cytosine_is_guanine;
   
       [Test]
  
positive.code:   Assert.AreEqual('UGCACCAGAAUU', complement.OfDna('ACGTGGTCTTAA'));
  end;
  
  procedure RnaTranscriptionTest.Dna_correctly_handles_invalid_input;
  begin
    Assert.AreEqual('', complement.OfDna('U'));
  end;
  
  procedure RnaTranscriptionTest.Dna_correctly_handles_completely_invalid_input;
  begin
    Assert.AreEqual('', complement.OfDna('XXX'));
  end;
  
  procedure RnaTranscriptionTest.Dna_correctly_handles_partially_invalid_input;
  begin
    Assert.AreEqual('', complement.OfDna('ACGTXXXCTTAA'));
  end;
  
  initialization
    TDUnitX.RegisterTestFixture(RnaTranscriptionTest);
  end.
  
negative.code:     [Test]
      [Ignore]
      procedure Rna_complement;
    end;
  
  implementation
  