kernel-doc (ac7242142b03421c96b0a2f8d99f146d075614c2) kernel-doc (d960eea974f5e500c0dcb95a934239cc1f481cfd)
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## Copyright (C) 2005-2009 Randy Dunlap ##

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

1421 $nested = $1;
1422
1423 # ignore members marked private:
1424 $members =~ s/\/\*\s*private:.*?\/\*\s*public:.*?\*\///gos;
1425 $members =~ s/\/\*\s*private:.*//gos;
1426 # strip comments:
1427 $members =~ s/\/\*.*?\*\///gos;
1428 $nested =~ s/\/\*.*?\*\///gos;
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## Copyright (C) 2005-2009 Randy Dunlap ##

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

1421 $nested = $1;
1422
1423 # ignore members marked private:
1424 $members =~ s/\/\*\s*private:.*?\/\*\s*public:.*?\*\///gos;
1425 $members =~ s/\/\*\s*private:.*//gos;
1426 # strip comments:
1427 $members =~ s/\/\*.*?\*\///gos;
1428 $nested =~ s/\/\*.*?\*\///gos;
1429 # strip kmemcheck_bitfield_{begin,end}.*;
1430 $members =~ s/kmemcheck_bitfield_.*?;//gos;
1429
1430 create_parameterlist($members, ';', $file);
1431 check_sections($file, $declaration_name, "struct", $sectcheck, $struct_actual, $nested);
1432
1433 output_declaration($declaration_name,
1434 'struct',
1435 {'struct' => $declaration_name,
1436 'module' => $modulename,

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

1463 push @parameterlist, $arg;
1464 if (!$parameterdescs{$arg}) {
1465 $parameterdescs{$arg} = $undescribed;
1466 print STDERR "Warning(${file}:$.): Enum value '$arg' ".
1467 "not described in enum '$declaration_name'\n";
1468 }
1469
1470 }
1431
1432 create_parameterlist($members, ';', $file);
1433 check_sections($file, $declaration_name, "struct", $sectcheck, $struct_actual, $nested);
1434
1435 output_declaration($declaration_name,
1436 'struct',
1437 {'struct' => $declaration_name,
1438 'module' => $modulename,

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

1465 push @parameterlist, $arg;
1466 if (!$parameterdescs{$arg}) {
1467 $parameterdescs{$arg} = $undescribed;
1468 print STDERR "Warning(${file}:$.): Enum value '$arg' ".
1469 "not described in enum '$declaration_name'\n";
1470 }
1471
1472 }
1471 # strip kmemcheck_bitfield_{begin,end}.*;
1472 $members =~ s/kmemcheck_bitfield_.*?;//gos;
1473
1474 output_declaration($declaration_name,
1475 'enum',
1476 {'enum' => $declaration_name,
1477 'module' => $modulename,
1478 'parameterlist' => \@parameterlist,
1479 'parameterdescs' => \%parameterdescs,
1480 'sectionlist' => \@sectionlist,

--- 738 unchanged lines hidden ---
1473
1474 output_declaration($declaration_name,
1475 'enum',
1476 {'enum' => $declaration_name,
1477 'module' => $modulename,
1478 'parameterlist' => \@parameterlist,
1479 'parameterdescs' => \%parameterdescs,
1480 'sectionlist' => \@sectionlist,

--- 738 unchanged lines hidden ---