diff options
author | Stefan Metzmacher <metze@samba.org> | 2010-08-25 10:07:54 +0200 |
---|---|---|
committer | Stefan Metzmacher <metze@samba.org> | 2010-08-26 13:29:21 +0200 |
commit | a701484230bf1119900287326f7a57c07776e4e9 (patch) | |
tree | 9ac2e5fbed645e23860508294201a8753d3bdb83 /pidl/tests/samba3-cli.pl | |
parent | 3c7a7bbb9a6258744523f41935f3967e48056787 (diff) | |
download | samba-a701484230bf1119900287326f7a57c07776e4e9.tar.gz |
pidl:Samba3/ClientNDR: remove unused ParseOutputArgument function
metze
Diffstat (limited to 'pidl/tests/samba3-cli.pl')
-rwxr-xr-x | pidl/tests/samba3-cli.pl | 12 |
1 files changed, 2 insertions, 10 deletions
diff --git a/pidl/tests/samba3-cli.pl b/pidl/tests/samba3-cli.pl index 319f1dd7c3b..c758ef45425 100755 --- a/pidl/tests/samba3-cli.pl +++ b/pidl/tests/samba3-cli.pl @@ -4,12 +4,12 @@ use strict; use warnings; -use Test::More tests => 9; +use Test::More tests => 8; use FindBin qw($RealBin); use lib "$RealBin"; use Util; use Parse::Pidl::Util qw(MyDumper); -use Parse::Pidl::Samba3::ClientNDR qw(ParseFunction ParseOutputArgument); +use Parse::Pidl::Samba3::ClientNDR qw(ParseFunction); use Parse::Pidl::Samba4::Header qw(GenerateFunctionInEnv GenerateFunctionOutEnv); # Make sure GenerateFunctionInEnv and GenerateFunctionOutEnv work @@ -234,11 +234,3 @@ NTSTATUS rpccli_bar(struct rpc_pipe_client *cli, "); -$x = new Parse::Pidl::Samba3::ClientNDR(); - -$fn = { NAME => "bar", ELEMENTS => [ ], RETURN_TYPE => "WERROR" }; -my $e = { NAME => "foo", ORIGINAL => { FILE => "f", LINE => -1 }, - LEVELS => [ { TYPE => "ARRAY", SIZE_IS => "mysize" }, { TYPE => "DATA", DATA_TYPE => "int" } ]}; - -$x->ParseOutputArgument($fn, $e); -is($x->{res}, "memcpy(foo, r.out.foo, (mysize) * sizeof(*foo));\n"); |