summaryrefslogtreecommitdiff
path: root/source4/pidl/tests/ndr_array.pl
diff options
context:
space:
mode:
Diffstat (limited to 'source4/pidl/tests/ndr_array.pl')
-rwxr-xr-xsource4/pidl/tests/ndr_array.pl37
1 files changed, 0 insertions, 37 deletions
diff --git a/source4/pidl/tests/ndr_array.pl b/source4/pidl/tests/ndr_array.pl
deleted file mode 100755
index 2a6b5bbd57..0000000000
--- a/source4/pidl/tests/ndr_array.pl
+++ /dev/null
@@ -1,37 +0,0 @@
-#!/usr/bin/perl
-# Array testing
-# (C) 2005 Jelmer Vernooij <jelmer@samba.org>
-# Published under the GNU General Public License
-use strict;
-
-use Test::More tests => 8;
-use FindBin qw($RealBin);
-use lib "$RealBin";
-use Util qw(test_samba4_ndr);
-
-test_samba4_ndr(
- 'Fixed-Array',
-
- '[public] void Test([in] uint8 x[10]);',
-
- '
- uint8_t data[] = {1,2,3,4,5,6,7,8,9,10};
- int i;
- DATA_BLOB b;
- struct ndr_pull *ndr;
- struct Test r;
-
- b.data = data;
- b.length = 10;
- ndr = ndr_pull_init_blob(&b, mem_ctx, NULL);
-
- if (!NDR_ERR_CODE_IS_SUCCESS(ndr_pull_Test(ndr, NDR_IN, &r)))
- return 1;
-
- if (ndr->offset != 10)
- return 2;
-
- for (i = 0; i < 10; i++) {
- if (r.in.x[i] != i+1) return 3;
- }
-');