From e009e2496aec30febbac75fc43c89db9f66670c9 Mon Sep 17 00:00:00 2001
From: Ben Pfaff <blp@gnu.org>
Date: Thu, 14 Dec 2006 05:35:38 +0000
Subject: [PATCH] Additionally verify that input files have equal number of
 lines.

---
 tests/formats/num-out-compare.pl | 10 ++++++++++
 1 file changed, 10 insertions(+)

diff --git a/tests/formats/num-out-compare.pl b/tests/formats/num-out-compare.pl
index 6bf0cb79..f43ef18d 100644
--- a/tests/formats/num-out-compare.pl
+++ b/tests/formats/num-out-compare.pl
@@ -83,6 +83,16 @@ while (defined (my $a = <EXPECTED>) && defined (my $b = <ACTUAL>)) {
 	$errors++;
     }
 }
+while (<EXPECTED>) {
+    print "Extra lines in $ARGV[0]\n";
+    $errors++;
+    last;
+}
+while (<ACTUAL>) {
+    print "Extra lines in $ARGV[1]\n";
+    $errors++;
+    last;
+}
 if ($verbose) {
     print "$errors errors\n";
     if (!$exact) {
-- 
2.30.2