minor docs
John Napiorkowski [Mon, 30 Mar 2009 00:23:31 +0000 (00:23 +0000)]
t/02-depending.t

index 9fe2e33..0305d38 100644 (file)
@@ -37,6 +37,8 @@ use Test::More tests=>15; {
         Int,
         sub {
             my ($dependent_int, $constraining_arrayref) = @_;
+            ## Yes, this is braindead way to check for uniques in an array
+            ## but this doesn't require additional dependencies.
             (grep { $_ == $dependent_int} @$constraining_arrayref) ? 0:1
         },
         ArrayRef[Int],