summaryrefslogtreecommitdiff
path: root/source4/pidl/tests/parse_idl.pl
diff options
context:
space:
mode:
authorJelmer Vernooij <jelmer@samba.org>2008-01-13 00:05:24 +0100
committerJelmer Vernooij <jelmer@samba.org>2008-01-13 00:05:24 +0100
commitb36a0aedd2dbe47429bfc2dda6ea802a92efb526 (patch)
treeee57fc720a0d52e75e4c2535b8cae2b807e9b832 /source4/pidl/tests/parse_idl.pl
parent3f9812f951bb110700077503a96b9d7d8cfdb2dc (diff)
downloadsamba-b36a0aedd2dbe47429bfc2dda6ea802a92efb526.tar.gz
samba-b36a0aedd2dbe47429bfc2dda6ea802a92efb526.tar.bz2
samba-b36a0aedd2dbe47429bfc2dda6ea802a92efb526.zip
pidl: Avoid accidently filling in empty body for types without body.
(This used to be commit 1fe5c1ad07c574dc094f59f728025dfcafa0cf22)
Diffstat (limited to 'source4/pidl/tests/parse_idl.pl')
-rwxr-xr-xsource4/pidl/tests/parse_idl.pl11
1 files changed, 10 insertions, 1 deletions
diff --git a/source4/pidl/tests/parse_idl.pl b/source4/pidl/tests/parse_idl.pl
index 93f772ef41..9d43ddccc7 100755
--- a/source4/pidl/tests/parse_idl.pl
+++ b/source4/pidl/tests/parse_idl.pl
@@ -4,7 +4,7 @@
# Published under the GNU General Public License
use strict;
-use Test::More tests => 65 * 2 + 6;
+use Test::More tests => 65 * 2 + 7;
use FindBin qw($RealBin);
use lib "$RealBin";
use Util qw(test_errors);
@@ -153,3 +153,12 @@ is_deeply($x,
[ { 'FILE' => '<foo>', 'NAME' => 'foo', 'DATA' => [
{ 'FILE' => '<foo>', 'LINE' => 0, 'NAME' => 'y', 'TYPE' => 'TYPEDEF', DATA => { TYPE => 'BITMAP', NAME => 'x' } } ],
'TYPE' => 'INTERFACE', 'LINE' => 0 } ]);
+
+
+# A typedef of a union with no body
+$x = Parse::Pidl::IDL::parse_string("interface foo { typedef union x y; }", "<foo>");
+
+is_deeply($x,
+ [ { 'FILE' => '<foo>', 'NAME' => 'foo', 'DATA' => [
+ { 'FILE' => '<foo>', 'LINE' => 0, 'NAME' => 'y', 'TYPE' => 'TYPEDEF', DATA => { TYPE => 'UNION', NAME => 'x' } } ],
+ 'TYPE' => 'INTERFACE', 'LINE' => 0 } ]);