Lines Matching refs:data
51 my %data;
58 my ($file, $ln, $msg, $data) = @_;
60 $data =~ s/\s+$/\n/;
64 if ($data ne "") {
65 print STDERR ". Line\n\t\t$data";
198 $data{$name}->{where} = $file;
199 $data{$name}->{subsys} = $subsys;
200 $data{$name}->{kconfig} = $kconfig;
201 $data{$name}->{description} = $description;
202 $data{$name}->{comments} = $comments;
203 $data{$name}->{table} = \%arch_table;
245 ($data{$a}->{subsys} cmp $data{$b}->{subsys}) ||
247 } keys %data) {
250 my %arch_table = %{$data{$name}->{table}};
251 printf "%-${max_size_subsys}s ", $data{$name}->{subsys};
253 printf "%-${max_size_kconfig}s ", $data{$name}->{kconfig};
255 printf "%-s\n", $data{$name}->{description};
277 ($data{$a}->{subsys} cmp $data{$b}->{subsys}) ||
279 } keys %data) {
282 my %arch_table = %{$data{$name}->{table}};
287 printf " %${max_size_subsys}s/ ", $data{$name}->{subsys};
290 printf "%${max_size_kconfig}s # ", $data{$name}->{kconfig};
291 printf " %s\n", $data{$name}->{description};
305 print ":Subsystem: $data{$feat}->{subsys} \n" if ($data{$feat}->{subsys});
306 print ":Kconfig: $data{$feat}->{kconfig} \n" if ($data{$feat}->{kconfig});
308 my $desc = $data{$feat}->{description};
313 my $com = $data{$feat}->{comments};
335 my %arch_table = %{$data{$feat}->{table}};
404 ($data{$a}->{subsys} cmp $data{$b}->{subsys}) or
406 } keys %data) {
408 if ($cur_subsys ne $data{$name}->{subsys}) {
413 $cur_subsys = $data{$name}->{subsys};
429 my %arch_table = %{$data{$name}->{table}};
461 my $description = $data{$name}->{description};
486 printf "|%-${desc_size}s", "``" . $data{$name}->{kconfig} . "``";
509 print STDERR Data::Dumper->Dump([\%data], [qw(*data)]) if ($debug);