sin/samba-mirror
1
0
Fork 0
mirror of https://github.com/samba-team/samba.git synced 2025-01-27 14:04:05 +03:00
Code

r10010: Support base_type() attribute

Browse Source 
(This used to be commit c0bae9b0b5cb56aea98e33b4d0a9d29c6622dd27)
This commit is contained in:
Jelmer Vernooij 2005-09-03 20:09:19 +00:00 committed by Gerald (Jerry) Carter
parent 102a6ec95b
commit e9b5bf90e6
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
source4/pidl/lib/Parse/Pidl/Samba/TDR.pm
View File

@ -167,7 +167,7 @@ sub ParserBitmap($$$$)
sub ParserEnum($$$$)
{
my ($e,$n,$t,$p) = @_;
my $bt = Parse::Pidl::Typelist::enum_type_fn($e);
my $bt = ($e->{PROPERTIES}->{base_type} or "uint8");
pidl static($p)."NTSTATUS tdr_$t\_$n (struct tdr_$t *tdr".printarg($t).", enum $n *v)";
pidl "{";
@ -190,6 +190,8 @@ sub ParserTypedef($$)
return if (has_property($e, "no$t"));
$e->{DATA}->{PROPERTIES} = $e->{PROPERTIES};
{ STRUCT => \&ParserStruct, UNION => \&ParserUnion,
ENUM => \&ParserEnum, BITMAP => \&ParserBitmap
}->{$e->{DATA}->{TYPE}}($e->{DATA}, $e->{NAME}, $t, has_property($e, "public"));