kernel-doc (05668381140309088443bf5dc53add4104610fbb) kernel-doc (0129a057b652b33dba6406a940af061cf0f36f79)
1#!/usr/bin/perl -w
2
3use strict;
4
5## Copyright (c) 1998 Michael Zucchi, All Rights Reserved ##
6## Copyright (C) 2000, 1 Tim Waugh <twaugh@redhat.com> ##
7## Copyright (C) 2001 Simon Huggins ##
8## ##

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

1513 my $file = shift;
1514
1515 $prototype =~ s/^static +//;
1516 $prototype =~ s/^extern +//;
1517 $prototype =~ s/^fastcall +//;
1518 $prototype =~ s/^asmlinkage +//;
1519 $prototype =~ s/^inline +//;
1520 $prototype =~ s/^__inline__ +//;
1#!/usr/bin/perl -w
2
3use strict;
4
5## Copyright (c) 1998 Michael Zucchi, All Rights Reserved ##
6## Copyright (C) 2000, 1 Tim Waugh <twaugh@redhat.com> ##
7## Copyright (C) 2001 Simon Huggins ##
8## ##

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

1513 my $file = shift;
1514
1515 $prototype =~ s/^static +//;
1516 $prototype =~ s/^extern +//;
1517 $prototype =~ s/^fastcall +//;
1518 $prototype =~ s/^asmlinkage +//;
1519 $prototype =~ s/^inline +//;
1520 $prototype =~ s/^__inline__ +//;
1521 $prototype =~ s/__devinit +//;
1521 $prototype =~ s/^#define +//; #ak added
1522 $prototype =~ s/__attribute__ \(\([a-z,]*\)\)//;
1523
1524 # Yes, this truly is vile. We are looking for:
1525 # 1. Return type (may be nothing if we're looking at a macro)
1526 # 2. Function name
1527 # 3. Function parameters.
1528 #

--- 373 unchanged lines hidden ---
1522 $prototype =~ s/^#define +//; #ak added
1523 $prototype =~ s/__attribute__ \(\([a-z,]*\)\)//;
1524
1525 # Yes, this truly is vile. We are looking for:
1526 # 1. Return type (may be nothing if we're looking at a macro)
1527 # 2. Function name
1528 # 3. Function parameters.
1529 #

--- 373 unchanged lines hidden ---