tracks/delphi/exercises/roman-numerals/uRomanNumeralsTest.pas in trackler-2.2.1.100 vs tracks/delphi/exercises/roman-numerals/uRomanNumeralsTest.pas in trackler-2.2.1.101

@@ -2,10 +2,13 @@
 
 interface
 uses
   DUnitX.TestFramework;
 
+const
+  CanonicalVersion = '1.2.0';
+
 type
 
   [TestFixture]
   RomanNumeralsTest = class(TObject)
   public
@@ -45,10 +48,14 @@
     [Ignore]
     procedure Fourty_eight_is_not_50_minus_2_but_rather_40_plus_8;
 
     [Test]
     [Ignore]
+    procedure Fourty_nine_is_not_40_plus_5_plus_4_but_rather_50_minus_10_plus_10_minus_1;
+
+    [Test]
+    [Ignore]
     procedure Fifty_is_a_single_L;
 
     [Test]
     [Ignore]
     procedure Ninety_being_100_minus_10_is_XC;
@@ -144,9 +151,16 @@
 procedure RomanNumeralsTest.Fourty_eight_is_not_50_minus_2_but_rather_40_plus_8;
 var arabicNumeral: integer;
 begin
   arabicNumeral := 48;
   Assert.AreEqual('XLVIII', arabicNumeral.ToRoman);
+end;
+
+procedure RomanNumeralsTest.Fourty_nine_is_not_40_plus_5_plus_4_but_rather_50_minus_10_plus_10_minus_1;
+var arabicNumeral: integer;
+begin
+  arabicNumeral := 49;
+  Assert.AreEqual('XLIX',arabicNumeral.ToRoman);
 end;
 
 procedure RomanNumeralsTest.Fifty_is_a_single_L;
 var arabicNumeral: integer;
 begin