diff options
| author | Jelmer Vernooij <jelmer@samba.org> | 2006-03-24 01:03:02 +0000 |
|---|---|---|
| committer | Gerald (Jerry) Carter <jerry@samba.org> | 2007-10-10 13:59:08 -0500 |
| commit | b6cae24de839756db87a62213795856c0051b8b9 (patch) | |
| tree | 2020f5b9f45acf2b0208db86e833e2bd158be576 /source4/pidl/tests/Util.pm | |
| parent | 311d6f47c85282925932b3a7326e66679be9451f (diff) | |
| download | samba-b6cae24de839756db87a62213795856c0051b8b9.tar.gz samba-b6cae24de839756db87a62213795856c0051b8b9.tar.bz2 samba-b6cae24de839756db87a62213795856c0051b8b9.zip | |
r14687: Start working on support for represent_as() and transmit_as() as
an alternative to subcontext()
(This used to be commit 744402160d5f994f5440553bb726e95a13033a83)
Diffstat (limited to 'source4/pidl/tests/Util.pm')
| -rw-r--r-- | source4/pidl/tests/Util.pm | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/source4/pidl/tests/Util.pm b/source4/pidl/tests/Util.pm index 3e0f214854..bb633f6e32 100644 --- a/source4/pidl/tests/Util.pm +++ b/source4/pidl/tests/Util.pm @@ -1,5 +1,5 @@ # Some simple utility functions for pidl tests -# Copyright (C) 2005 Jelmer Vernooij +# Copyright (C) 2005-2006 Jelmer Vernooij # Published under the GNU General Public License package Util; @@ -18,9 +18,9 @@ use Parse::Pidl::Samba4::Header; # Generate a Samba4 parser for an IDL fragment and run it with a specified # piece of code to check whether the parser works as expected -sub test_samba4_ndr($$$) +sub test_samba4_ndr { - my ($name,$idl,$c) = @_; + my ($name,$idl,$c,$extra) = @_; my $pidl = Parse::Pidl::IDL::parse_string("interface echo { $idl }; ", "<$name>"); ok(defined($pidl), "($name) parse idl"); @@ -58,6 +58,7 @@ SKIP: { print CC $header; print CC $ndrheader; print CC $ndrparser; + print CC $extra if ($extra); print CC "int main(int argc, const char **argv) { TALLOC_CTX *mem_ctx = talloc_init(NULL); |