Prechádzať zdrojové kódy

detect excess messages after sync

Oswald Buddenhagen 19 rokov pred
rodič
commit
d3faf0d27f
1 zmenil súbory, kde vykonal 5 pridanie a 0 odobranie
  1. 5 0
      src/run-tests.pl

+ 5 - 0
src/run-tests.pl

@@ -268,6 +268,11 @@ sub ckbox($$$@)
 			print STDERR "flag mismatch for $bn:$num - expected '$flg', got '$ms{$num}[1]', config: $cfg\n";
 			exit 1;
 		}
+		delete $ms{$num};
+	}
+	if (%ms) {
+		print STDERR "excess messages in '$bn': ".join(", ", sort({$a <=> $b } keys(%ms))).", config: $cfg\n";
+		exit 1;
 	}
 }