kernel-doc (3bf3e21c15d4386a5f15118ec39bbc1b67ea5759) | kernel-doc (b77fdd6a48e60a0ed1865edbe6d9bf0538551f85) |
---|---|
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> ## --- 1640 unchanged lines hidden (view full) --- 1649 } 1650 if ($err) { 1651 if ($decl_type eq "function") { 1652 emit_warning("${file}:$.", 1653 "Excess function parameter " . 1654 "'$sects[$sx]' " . 1655 "description in '$decl_name'\n"); 1656 } | 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> ## --- 1640 unchanged lines hidden (view full) --- 1649 } 1650 if ($err) { 1651 if ($decl_type eq "function") { 1652 emit_warning("${file}:$.", 1653 "Excess function parameter " . 1654 "'$sects[$sx]' " . 1655 "description in '$decl_name'\n"); 1656 } |
1657 elsif (($decl_type eq "struct") or 1658 ($decl_type eq "union")) { 1659 emit_warning("${file}:$.", 1660 "Excess $decl_type member " . 1661 "'$sects[$sx]' " . 1662 "description in '$decl_name'\n"); 1663 } |
|
1657 } 1658 } 1659} 1660 1661## 1662# Checks the section describing the return value of a function. 1663sub check_return_section { 1664 my $file = shift; --- 862 unchanged lines hidden --- | 1664 } 1665 } 1666} 1667 1668## 1669# Checks the section describing the return value of a function. 1670sub check_return_section { 1671 my $file = shift; --- 862 unchanged lines hidden --- |