2 # (C) 2007 Jelmer Vernooij <jelmer@samba.org>
3 # Published under the GNU General Public License
7 use Test::More tests => 1;
8 use FindBin qw($RealBin);
11 use Parse::Pidl::Util qw(MyDumper);
12 use Parse::Pidl::NDR qw(ValidElement);
19 'PROPERTIES' => {"subcontext" => 1},
22 'PARENT' => { TYPE => 'STRUCT' },
25 test_warnings("foo.idl:42: subcontext() is deprecated. Use represent_as() or transmit_as() instead\n",
26 sub { ValidElement($e); });