From: Brad Gilbert <b2gills@gmail.com>
Date: Sun, 16 Sep 2012 20:15:02 +0000 (-0500)
Subject: Added test names to some tests in t/test_pl/_num_to_alpha.t
X-Git-Tag: upstream/5.20.0~5309
X-Git-Url: http://review.tizen.org/git/?a=commitdiff_plain;h=a087e8153f95d3e52d52a6d8ce91cd2f671e4649;p=platform%2Fupstream%2Fperl.git

Added test names to some tests in t/test_pl/_num_to_alpha.t
---

diff --git a/t/test_pl/_num_to_alpha.t b/t/test_pl/_num_to_alpha.t
index 93ddcf2..01aed33 100644
--- a/t/test_pl/_num_to_alpha.t
+++ b/t/test_pl/_num_to_alpha.t
@@ -5,12 +5,12 @@ BEGIN {
     require './test.pl';
 }
 
-is( _num_to_alpha(-1), undef);
-is( _num_to_alpha( 0), 'A');
+is( _num_to_alpha(-1), undef, 'Returns undef for negative numbers');
+is( _num_to_alpha( 0), 'A', "Starts at 'A'");
 is( _num_to_alpha( 1), 'B');
 
-is( _num_to_alpha(26 - 1), 'Z');
-is( _num_to_alpha(26    ), 'AA');
+is( _num_to_alpha(26 - 1), 'Z', 'Last single letter return value');
+is( _num_to_alpha(26    ), 'AA', 'First double letter return value');
 is( _num_to_alpha(26 + 1), 'AB');
 
 is( _num_to_alpha(26 + 26 - 2), 'AY');
@@ -22,21 +22,23 @@ is( _num_to_alpha(26 ** 2 - 1), 'YZ');
 is( _num_to_alpha(26 ** 2    ), 'ZA');
 is( _num_to_alpha(26 ** 2 + 1), 'ZB');
 
-is( _num_to_alpha(26 ** 2 + 26 - 1), 'ZZ');
-is( _num_to_alpha(26 ** 2 + 26    ), 'AAA');
+is( _num_to_alpha(26 ** 2 + 26 - 1), 'ZZ', 'Last double letter return value');
+is( _num_to_alpha(26 ** 2 + 26    ), 'AAA', 'First triple letter return value');
 is( _num_to_alpha(26 ** 2 + 26 + 1), 'AAB');
 
-is( _num_to_alpha(26 ** 3 + 26 ** 2 + 26 - 1 ), 'ZZZ');
-is( _num_to_alpha(26 ** 3 + 26 ** 2 + 26     ), 'AAAA');
+is( _num_to_alpha(26 ** 3 + 26 ** 2 + 26 - 1 ), 'ZZZ', 'Last triple letter return value');
+is( _num_to_alpha(26 ** 3 + 26 ** 2 + 26     ), 'AAAA', 'First quadruple letter return value');
 is( _num_to_alpha(26 ** 3 + 26 ** 2 + 26 + 1 ), 'AAAB');
 
-is( _num_to_alpha(26 - 1 , 1), 'Z');
+note('Testing limit capabilities');
+
+is( _num_to_alpha(26 - 1 , 1), 'Z', 'Largest return value for one letter');
 is( _num_to_alpha(26     , 1), undef); # AA
 
-is( _num_to_alpha(26 ** 2 + 26 - 1 , 2 ), 'ZZ');
+is( _num_to_alpha(26 ** 2 + 26 - 1 , 2 ), 'ZZ', 'Largest return value for two letters');
 is( _num_to_alpha(26 ** 2 + 26     , 2 ), undef); # AAA
 
-is( _num_to_alpha(26 ** 3 + 26 ** 2 + 26 - 1 , 3 ), 'ZZZ');
+is( _num_to_alpha(26 ** 3 + 26 ** 2 + 26 - 1 , 3 ), 'ZZZ', 'Largest return value for three letters');
 is( _num_to_alpha(26 ** 3 + 26 ** 2 + 26     , 3 ), undef); # AAAA
 
 done_testing();