kernel-doc (9ddb236f13594b34a12dacf69a5adca7a1aef35e) kernel-doc (5eb6b4b3e21612be735fe0305c27bfe2e7ab3224)
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> ##

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

1589# takes a function prototype and the name of the current file being
1590# processed and spits out all the details stored in the global
1591# arrays/hashes.
1592sub dump_function($$) {
1593 my $prototype = shift;
1594 my $file = shift;
1595 my $noret = 0;
1596
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> ##

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

1589# takes a function prototype and the name of the current file being
1590# processed and spits out all the details stored in the global
1591# arrays/hashes.
1592sub dump_function($$) {
1593 my $prototype = shift;
1594 my $file = shift;
1595 my $noret = 0;
1596
1597 print_lineno($.);
1598
1597 $prototype =~ s/^static +//;
1598 $prototype =~ s/^extern +//;
1599 $prototype =~ s/^asmlinkage +//;
1600 $prototype =~ s/^inline +//;
1601 $prototype =~ s/^__inline__ +//;
1602 $prototype =~ s/^__inline +//;
1603 $prototype =~ s/^__always_inline +//;
1604 $prototype =~ s/^noinline +//;

--- 682 unchanged lines hidden ---
1599 $prototype =~ s/^static +//;
1600 $prototype =~ s/^extern +//;
1601 $prototype =~ s/^asmlinkage +//;
1602 $prototype =~ s/^inline +//;
1603 $prototype =~ s/^__inline__ +//;
1604 $prototype =~ s/^__inline +//;
1605 $prototype =~ s/^__always_inline +//;
1606 $prototype =~ s/^noinline +//;

--- 682 unchanged lines hidden ---