git.samba.org
/
sfrench
/
samba-autobuild
/
.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
history
|
raw
|
HEAD
pidl/ws: Eliminate e_uuid_t in favor of e_guid_t
[sfrench/samba-autobuild/.git]
/
pidl
/
tests
/
dump.pl
1
#!/usr/bin/perl
2
# (C) 2007 Jelmer Vernooij <jelmer@samba.org>
3
# Published under the GNU General Public License
4
use strict;
5
use warnings;
6
7
use Test::More tests => 1;
8
use FindBin qw($RealBin);
9
use lib "$RealBin";
10
use Util;
11
use Parse::Pidl::Dump qw(DumpStruct);
12
13
is (DumpStruct({ NAME => "foo", ELEMENTS => []}),
14
"struct foo {\n}");
15