--- trunk/t/1-validate.t	2006/09/07 16:54:47	655
+++ trunk/t/1-validate.t	2006/09/08 14:35:31	659
@@ -1,7 +1,7 @@
 #!/usr/bin/perl -w
 
 use strict;
-use Test::More tests => 43;
+use Test::More tests => 50;
 use Test::Exception;
 use blib;
 
@@ -31,6 +31,7 @@
 	'902' => [ 'b', 'c' ],
 	'903' => [ 'a', 'b', 'c' ],
 	'904' => [ 'a' ],
+	'905' => [ 'a*' ],
 }, 'rules parsed');
 
 
@@ -122,3 +123,14 @@
 	'904' => [ { 'b' => 1 } ]
 }, qw/field 904 subfield extra b/);
 
+test_v({
+	'904' => [ { 'a' => [ 1,2 ] } ]
+}, qw/field 904 subfield extra_repeatable a/);
+
+test_v({
+	'905' => [ { 'a' => [ 1,2 ] } ]
+});
+
+test_v({
+	'905' => [ ]
+});