diff options
Diffstat (limited to 'pidl/lib/Parse/Pidl/Typelist.pm')
| -rw-r--r-- | pidl/lib/Parse/Pidl/Typelist.pm | 12 |
1 files changed, 7 insertions, 5 deletions
diff --git a/pidl/lib/Parse/Pidl/Typelist.pm b/pidl/lib/Parse/Pidl/Typelist.pm index bf78717b12..4f26a92ed2 100644 --- a/pidl/lib/Parse/Pidl/Typelist.pm +++ b/pidl/lib/Parse/Pidl/Typelist.pm @@ -291,6 +291,7 @@ sub mapType($$) return "struct $n" if ($t->{TYPE} eq "STRUCT" or $t->{TYPE} eq "INTERFACE"); return "union $n" if ($t->{TYPE} eq "UNION"); return mapScalarType(bitmap_type_fn($t)) if ($t->{TYPE} eq "BITMAP"); + return "struct $n" if ($t->{TYPE} eq "PIPE"); die("Unknown type $t->{TYPE}"); } @@ -329,11 +330,12 @@ sub LoadIdl($;$) }) if (has_property($x, "object")); foreach my $y (@{$x->{DATA}}) { - if ($y->{TYPE} eq "TYPEDEF" - or $y->{TYPE} eq "UNION" - or $y->{TYPE} eq "STRUCT" - or $y->{TYPE} eq "ENUM" - or $y->{TYPE} eq "BITMAP") { + if ($y->{TYPE} eq "TYPEDEF" + or $y->{TYPE} eq "UNION" + or $y->{TYPE} eq "STRUCT" + or $y->{TYPE} eq "ENUM" + or $y->{TYPE} eq "BITMAP" + or $y->{TYPE} eq "PIPE") { $y->{BASEFILE} = $basename; addType($y); } |