blob: ff9c86b775074a6e1caddfe6e98c73a13964765e (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
|
# CVS admin : run this script to compare the set of Qt headers to
# the actual content of header_list
$l = "header_list";
$q = $ENV{'QTDIR'} || die "QTDIR not set\n";
@h = <$q/include/*.h>;
grep s|.*/(.*\.h)|$1|, @h;
open(IN, $l) or die "$!: $l\n";
@old = <IN>;
chomp @old;
map{ $h{$_}++ } @h;
map{ $old{$_}++ } @old;
map{ $diff{$_}++ unless $old{$_} } keys %h;
map{ delete $diff{$_} if /^qconfig.*/ or !/^q/ } keys %diff;
print "Check if any of the following headers should be added to $l:\n\n";
print join "\n", keys %diff, "\n"
|
