anchor.diff:  
       [Test]
       [Ignore]
  +    procedure Shouting_gibberish;
  +
  +    [Test]
  +    [Ignore]
       procedure Asking_a_question;
   
       [Test]
  
positive.code:   Assert.AreEqual('Fine. Be that way!', TBob.Response(#13#10 + ' ' + #9));
  end;
  
  procedure BobTests.Question_with_only_numbers;
  begin
    Assert.AreEqual('Sure.', TBob.Response('4?'));
  end;
  
negative.code:   Assert.AreEqual('Calm down, I know what I''m doing!', TBob.Response('WHAT THE HELL WERE YOU THINKING?'));
  end;
  
  procedure BobTests.Shouting_gibberish;
  begin
    Assert.AreEqual('Whoa, chill out!', TBob.Response('FCECDFCAAB'));
  end;
  
  procedure BobTests.Shouting_numbers;
  begin
    Assert.AreEqual('Whoa, chill out!', TBob.Response('1, 2, 3 GO!'));
  end;
  
  procedure BobTests.No_letters;
  begin
    Assert.AreEqual('Whatever.', TBob.Response('1, 2, 3'));
  end;
  