|
@@ -1056,7 +1056,8 @@ sub output_struct_man(%) {
|
|
# pointer-to-function
|
|
# pointer-to-function
|
|
print ".BI \" ".$1."\" ".$parameter." \") (".$2.")"."\"\n;\n";
|
|
print ".BI \" ".$1."\" ".$parameter." \") (".$2.")"."\"\n;\n";
|
|
} elsif ($type =~ m/^(.*?)\s*(:.*)/) {
|
|
} elsif ($type =~ m/^(.*?)\s*(:.*)/) {
|
|
- print ".BI \" ".$1."\" ".$parameter.$2." \""."\"\n;\n";
|
|
|
|
|
|
+ # bitfield
|
|
|
|
+ print ".BI \" ".$1."\ \" ".$parameter.$2." \""."\"\n;\n";
|
|
} else {
|
|
} else {
|
|
$type =~ s/([^\*])$/$1 /;
|
|
$type =~ s/([^\*])$/$1 /;
|
|
print ".BI \" ".$type."\" ".$parameter." \""."\"\n;\n";
|
|
print ".BI \" ".$type."\" ".$parameter." \""."\"\n;\n";
|
|
@@ -1169,6 +1170,7 @@ sub output_enum_text(%) {
|
|
my $count;
|
|
my $count;
|
|
print "Enum:\n\n";
|
|
print "Enum:\n\n";
|
|
|
|
|
|
|
|
+ print "enum ".$args{'enum'}." - ".$args{'purpose'}."\n\n";
|
|
print "enum ".$args{'enum'}." {\n";
|
|
print "enum ".$args{'enum'}." {\n";
|
|
$count = 0;
|
|
$count = 0;
|
|
foreach $parameter (@{$args{'parameterlist'}}) {
|
|
foreach $parameter (@{$args{'parameterlist'}}) {
|
|
@@ -1197,7 +1199,7 @@ sub output_typedef_text(%) {
|
|
my $count;
|
|
my $count;
|
|
print "Typedef:\n\n";
|
|
print "Typedef:\n\n";
|
|
|
|
|
|
- print "typedef ".$args{'typedef'}."\n";
|
|
|
|
|
|
+ print "typedef ".$args{'typedef'}." - ".$args{'purpose'}."\n";
|
|
output_section_text(@_);
|
|
output_section_text(@_);
|
|
}
|
|
}
|
|
|
|
|
|
@@ -1206,7 +1208,7 @@ sub output_struct_text(%) {
|
|
my %args = %{$_[0]};
|
|
my %args = %{$_[0]};
|
|
my ($parameter);
|
|
my ($parameter);
|
|
|
|
|
|
- print $args{'type'}." ".$args{'struct'}.":\n\n";
|
|
|
|
|
|
+ print $args{'type'}." ".$args{'struct'}." - ".$args{'purpose'}."\n\n";
|
|
print $args{'type'}." ".$args{'struct'}." {\n";
|
|
print $args{'type'}." ".$args{'struct'}." {\n";
|
|
foreach $parameter (@{$args{'parameterlist'}}) {
|
|
foreach $parameter (@{$args{'parameterlist'}}) {
|
|
if ($parameter =~ /^#/) {
|
|
if ($parameter =~ /^#/) {
|