kernel-doc (82f5ee35d0b960c54370a72418b9ec0dca382262) kernel-doc (be9264110e4e874622d588a75daf930539fdf6ea)
1#!/usr/bin/env perl
2# SPDX-License-Identifier: GPL-2.0
3# vim: softtabstop=4
4
5use warnings;
6use strict;
7
8## Copyright (c) 1998 Michael Zucchi, All Rights Reserved ##

--- 2308 unchanged lines hidden (view full) ---

2317 emit_warning("${file}:$.", "Incorrect use of kernel-doc format: $_");
2318 }
2319 }
2320}
2321
2322
2323sub process_file($) {
2324 my $file;
1#!/usr/bin/env perl
2# SPDX-License-Identifier: GPL-2.0
3# vim: softtabstop=4
4
5use warnings;
6use strict;
7
8## Copyright (c) 1998 Michael Zucchi, All Rights Reserved ##

--- 2308 unchanged lines hidden (view full) ---

2317 emit_warning("${file}:$.", "Incorrect use of kernel-doc format: $_");
2318 }
2319 }
2320}
2321
2322
2323sub process_file($) {
2324 my $file;
2325 my $initial_section_counter = $section_counter;
2326 my ($orig_file) = @_;
2327
2328 $file = map_filename($orig_file);
2329
2330 if (!open(IN_FILE,"<$file")) {
2331 print STDERR "Error: Cannot open file $file\n";
2332 ++$errors;
2333 return;

--- 21 unchanged lines hidden (view full) ---

2355 } elsif ($state == STATE_PROTO) {
2356 process_proto($file, $_);
2357 } elsif ($state == STATE_DOCBLOCK) {
2358 process_docblock($file, $_);
2359 }
2360 }
2361
2362 # Make sure we got something interesting.
2325 my ($orig_file) = @_;
2326
2327 $file = map_filename($orig_file);
2328
2329 if (!open(IN_FILE,"<$file")) {
2330 print STDERR "Error: Cannot open file $file\n";
2331 ++$errors;
2332 return;

--- 21 unchanged lines hidden (view full) ---

2354 } elsif ($state == STATE_PROTO) {
2355 process_proto($file, $_);
2356 } elsif ($state == STATE_DOCBLOCK) {
2357 process_docblock($file, $_);
2358 }
2359 }
2360
2361 # Make sure we got something interesting.
2363 if ($initial_section_counter == $section_counter && $
2364 output_mode ne "none") {
2362 if (!$section_counter && $output_mode ne "none") {
2365 if ($output_selection == OUTPUT_INCLUDE) {
2366 emit_warning("${file}:1", "'$_' not found\n")
2367 for keys %function_table;
2368 } else {
2369 emit_warning("${file}:1", "no structured comments found\n");
2370 }
2371 }
2372 close IN_FILE;

--- 173 unchanged lines hidden --- 		2363 if ($output_selection == OUTPUT_INCLUDE) {
2364 emit_warning("${file}:1", "'$_' not found\n")
2365 for keys %function_table;
2366 } else {
2367 emit_warning("${file}:1", "no structured comments found\n");
2368 }
2369 }
2370 close IN_FILE;

--- 173 unchanged lines hidden ---