Lines Matching refs:header
91 my $header = pop @queue;
92 next if exists $deps{$header};
94 $deps{$header} = [] unless exists $deps{$header};
96 my $path = search($header);
107 push @{$deps{$header}}, [$i + 1, $dep];
130 for my $header (reverse @$cycle) {
133 $header->[1], $header->[0],
134 $header->[1] eq $last->[1] ? ' <-- here' : '';
177 for my $header (keys %deps) {
179 mangle($header), $header;
185 for my $header (keys %deps) {
186 for my $dep (@{$deps{$header}}) {
188 mangle($header), mangle($dep->[1]);