}
if ($ret) {
- pidl " /* [" . substr($ret, 0, -1) . "] */";
+ pidl "/* [" . substr($ret, 0, -1) . "] */";
}
}
pidl tabs()."char _empty_;\n";
}
$tab_depth--;
-
- pidl "};";
+ pidl tabs()."}";
if (defined $struct->{PROPERTIES}) {
HeaderProperties($struct->{PROPERTIES}, []);
}
- pidl "\n\n";
}
#####################################################################
}
pidl "\n";
$tab_depth--;
- pidl "};\n";
+ pidl "}\n";
pidl "#else\n";
my $count = 0;
- pidl "enum $name { __donnot_use_enum_$name=0x7FFFFFFF};\n";
+ pidl "enum $name { __donnot_use_enum_$name=0x7FFFFFFF}\n";
my $with_val = 0;
my $without_val = 0;
foreach my $e (@{$enum->{ELEMENTS}}) {
}
}
$tab_depth--;
+ pidl "}";
- pidl "};";
if (defined $union->{PROPERTIES}) {
HeaderProperties($union->{PROPERTIES}, []);
}
- pidl "\n\n";
}
#####################################################################
HeaderFunctionInOut($fn, "in");
HeaderFunctionInOut($fn, "inout");
$tab_depth--;
- pidl tabs()."} in;\n";
+ pidl tabs()."} in;\n\n";
$needed++;
}
pidl tabs().mapTypeName($fn->{RETURN_TYPE}) . " result;\n";
}
$tab_depth--;
- pidl tabs()."} out;\n";
+ pidl tabs()."} out;\n\n";
$needed++;
}
HeaderUnion($d, $d->{NAME}) if ($d->{TYPE} eq "UNION");
HeaderEnum($d, $d->{NAME}) if ($d->{TYPE} eq "ENUM");
HeaderBitmap($d, $d->{NAME}) if ($d->{TYPE} eq "BITMAP");
+ pidl ";\n\n" if ($d->{TYPE} eq "BITMAP" or
+ $d->{TYPE} eq "STRUCT" or
+ $d->{TYPE} eq "TYPEDEF" or
+ $d->{TYPE} eq "UNION" or
+ $d->{TYPE} eq "ENUM");
}
foreach my $d (@{$interface->{DATA}}) {