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 --- |