From e9b5bf90e646af31c23631d08a73dcc8adca456e Mon Sep 17 00:00:00 2001 From: Jelmer Vernooij Date: Sat, 3 Sep 2005 20:09:19 +0000 Subject: r10010: Support base_type() attribute (This used to be commit c0bae9b0b5cb56aea98e33b4d0a9d29c6622dd27) --- source4/pidl/lib/Parse/Pidl/Samba/TDR.pm | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) (limited to 'source4/pidl/lib/Parse/Pidl') diff --git a/source4/pidl/lib/Parse/Pidl/Samba/TDR.pm b/source4/pidl/lib/Parse/Pidl/Samba/TDR.pm index aa41e9419c..041170c152 100644 --- a/source4/pidl/lib/Parse/Pidl/Samba/TDR.pm +++ b/source4/pidl/lib/Parse/Pidl/Samba/TDR.pm @@ -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")); -- cgit