[Moose-commits] r7878 - MooseX-Types-Dependent/trunk/t

[jnapiorkowski at code2.0beta.co.uk]

Author: jnapiorkowski
Date: 2009-03-30 11:09:35 -0700 (Mon, 30 Mar 2009)
New Revision: 7878

Modified:
   MooseX-Types-Dependent/trunk/t/02-depending.t
Log:
created placeholder for API tests, and a bit of docs

Modified: MooseX-Types-Dependent/trunk/t/02-depending.t
===================================================================
--- MooseX-Types-Dependent/trunk/t/02-depending.t	2009-03-30 16:01:32 UTC (rev 7877)
+++ MooseX-Types-Dependent/trunk/t/02-depending.t	2009-03-30 18:09:35 UTC (rev 7878)
@@ -42,7 +42,8 @@
 	ok IntGreaterThanInt->check([12,1]), "Success, 12 is greater than1.";
 	ok IntGreaterThanInt->check([0,-10]), "Success, 0 is greater than -10.";
     
-    ## The dependent value cannot exist in the constraining arrayref
+    ## The dependent value cannot exist in the constraining arrayref.  Also, it
+	## (the dependent type) must exceed 2.
     subtype UniqueInt,
       as Depending[
         Int,
@@ -66,7 +67,7 @@
     ok UniqueInt->check([3,[100..110]]), 'PASS unique in set';
     ok UniqueInt->check([4,[100..110]]), 'PASS unique in set';	
 	
-	## Basically as above, with sugar
+	## Basically as above, with sugar.
     subtype UniqueInt2,
 	  as depending {
             my ($dependent_int, $constraining_arrayref) = @_;