Skip to content

Commit 10fdeea

Browse files
committed
Luhn: update to v1.6.0
per exercism/problem-specifications#1500
1 parent 643c69c commit 10fdeea

File tree

1 file changed

+11
-2
lines changed

1 file changed

+11
-2
lines changed

exercises/luhn/uLuhnTest.pas

Lines changed: 11 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -5,12 +5,12 @@ interface
55
DUnitX.TestFramework;
66

77
const
8-
CanonicalVersion = '1.5.0';
8+
CanonicalVersion = '1.6.0';
99

1010
type
1111

1212
[TestFixture]
13-
TLuhnTest = class(TObject)
13+
TLuhnTest = class(TObject)
1414
public
1515
[Test]
1616
// [Ignore('Comment the "[Ignore]" statement to run the test')]
@@ -44,6 +44,10 @@ TLuhnTest = class(TObject)
4444
[Ignore]
4545
procedure valid_number_with_an_even_number_of_digits;
4646

47+
[Test]
48+
[Ignore]
49+
procedure valid_number_with_an_odd_number_of_spaces;
50+
4751
[Test]
4852
[Ignore]
4953
procedure valid_strings_with_a_non_digit_added_at_the_end_become_invalid;
@@ -142,6 +146,11 @@ procedure TLuhnTest.valid_number_with_an_even_number_of_digits;
142146
Assert.AreEqual(true, TLuhn.Valid('095 245 88'));
143147
end;
144148

149+
procedure TLuhnTest.valid_number_with_an_odd_number_of_spaces;
150+
begin
151+
Assert.AreEqual(true, TLuhn.Valid('234 567 891 234'));
152+
end;
153+
145154
procedure TLuhnTest.valid_strings_with_a_non_digit_added_at_the_end_become_invalid;
146155
begin
147156
Assert.AreEqual(false, TLuhn.Valid('059a'));

0 commit comments

Comments
 (0)