setup("test_bn");
-my @files = (
- "bnexp.txt", "bnmod.txt", "bnmul.txt", "bnshift.txt", "bnsum.txt"
- );
+my @files = qw( bnexp.txt bnmod.txt bnmul.txt bnshift.txt bnsum.txt bngcd.txt );
+
plan tests => 1 + scalar(@files);
foreach my $f ( @files ) {