Remove parserTests.inc checks, as testing is now done quite differently.
authorGreg Sabino Mullane <greg@users.mediawiki.org>
Tue, 5 Oct 2010 15:00:19 +0000 (15:00 +0000)
committerGreg Sabino Mullane <greg@users.mediawiki.org>
Tue, 5 Oct 2010 15:00:19 +0000 (15:00 +0000)
maintenance/postgres/compare_schemas.pl

index 78d2365..df37319 100644 (file)
@@ -142,50 +142,6 @@ sub parse_sql {
 
 } ## end of parse_sql
 
-## Read in the parser test information
-my $parsefile = '../parserTests.inc';
-open my $pfh, '<', $parsefile or die qq{Could not open "$parsefile": $!\n};
-my $stat = 0;
-my %ptable;
-while (<$pfh>) {
-       if (!$stat) {
-               if (/function listTables/) {
-                       $stat = 1;
-               }
-               next;
-       }
-       $ptable{$1}=2 while m{'(\w+)'}g;
-       last if /\);/;
-}
-close $pfh or die qq{Could not close "$parsefile": $!\n};
-
-my $OK_NOT_IN_PTABLE = '
-change_tag
-filearchive
-logging
-profiling
-querycache_info
-searchindex
-tag_summary
-trackbacks
-transcache
-user_newtalk
-updatelog
-valid_tag
-';
-
-## Make sure all tables in main tables.sql are accounted for in the parsertest.
-for my $table (sort keys %{$old{'../tables.sql'}}) {
-       $ptable{$table}++;
-       next if $ptable{$table} > 2;
-       next if $OK_NOT_IN_PTABLE =~ /\b$table\b/;
-       print qq{Table "$table" is in the schema, but not used inside of parserTest.inc\n};
-}
-## Any that are used in ptables but no longer exist in the schema?
-for my $table (sort grep { $ptable{$_} == 2 } keys %ptable) {
-       print qq{Table "$table" ($ptable{$table}) used in parserTest.inc, but not found in schema\n};
-}
-
 for my $oldfile (@old) {
 
 ## Begin non-standard indent