kernel-doc (aaccf3c97418f169afdbb5855e9cbcbda34e90fd) kernel-doc (cf419d542f1d3de80034ebb0462d9ed9b1ae9277)
1#!/usr/bin/env perl
2# SPDX-License-Identifier: GPL-2.0
3
4use warnings;
5use strict;
6
7## Copyright (c) 1998 Michael Zucchi, All Rights Reserved ##
8## Copyright (C) 2000, 1 Tim Waugh <twaugh@redhat.com> ##

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

1899 }
1900
1901 if (($declaration_purpose eq "") && $verbose) {
1902 print STDERR "${file}:$.: warning: missing initial short description on line:\n";
1903 print STDERR $_;
1904 ++$warnings;
1905 }
1906
1#!/usr/bin/env perl
2# SPDX-License-Identifier: GPL-2.0
3
4use warnings;
5use strict;
6
7## Copyright (c) 1998 Michael Zucchi, All Rights Reserved ##
8## Copyright (C) 2000, 1 Tim Waugh <twaugh@redhat.com> ##

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

1899 }
1900
1901 if (($declaration_purpose eq "") && $verbose) {
1902 print STDERR "${file}:$.: warning: missing initial short description on line:\n";
1903 print STDERR $_;
1904 ++$warnings;
1905 }
1906
1907 if ($identifier =~ m/^struct/) {
1907 if ($identifier =~ m/^struct\b/) {
1908 $decl_type = 'struct';
1908 $decl_type = 'struct';
1909 } elsif ($identifier =~ m/^union/) {
1909 } elsif ($identifier =~ m/^union\b/) {
1910 $decl_type = 'union';
1910 $decl_type = 'union';
1911 } elsif ($identifier =~ m/^enum/) {
1911 } elsif ($identifier =~ m/^enum\b/) {
1912 $decl_type = 'enum';
1912 $decl_type = 'enum';
1913 } elsif ($identifier =~ m/^typedef/) {
1913 } elsif ($identifier =~ m/^typedef\b/) {
1914 $decl_type = 'typedef';
1915 } else {
1916 $decl_type = 'function';
1917 }
1918
1919 if ($verbose) {
1920 print STDERR "${file}:$.: info: Scanning doc for $identifier\n";
1921 }

--- 301 unchanged lines hidden --- 		1914 $decl_type = 'typedef';
1915 } else {
1916 $decl_type = 'function';
1917 }
1918
1919 if ($verbose) {
1920 print STDERR "${file}:$.: info: Scanning doc for $identifier\n";
1921 }

--- 301 unchanged lines hidden ---