diff options
| author | Stefan Metzmacher <metze@samba.org> | 2008-08-19 20:12:03 +0200 |
|---|---|---|
| committer | Stefan Metzmacher <metze@samba.org> | 2008-08-20 15:22:02 +0200 |
| commit | ef7e12b914f4e4f53a230b96d6a2f9b25c68f961 (patch) | |
| tree | a811ab26d739b9c84cc6b56c5ccb67cb7cf81027 /source4/pidl/tests | |
| parent | c8ef2956c62ca6d804db40ac093638d67b479b71 (diff) | |
| download | samba-ef7e12b914f4e4f53a230b96d6a2f9b25c68f961.tar.gz samba-ef7e12b914f4e4f53a230b96d6a2f9b25c68f961.tar.bz2 samba-ef7e12b914f4e4f53a230b96d6a2f9b25c68f961.zip | |
pidl/NDR::Parser: pass $ndr to ->PRINT_FN_BLOB()
metze
(This used to be commit a143806364051141604ebb40eb5a4ef72958b55f)
Diffstat (limited to 'source4/pidl/tests')
| -rwxr-xr-x | source4/pidl/tests/samba-ndr.pl | 9 |
1 files changed, 6 insertions, 3 deletions
diff --git a/source4/pidl/tests/samba-ndr.pl b/source4/pidl/tests/samba-ndr.pl index ae67e66bb9..cdfe0514f1 100755 --- a/source4/pidl/tests/samba-ndr.pl +++ b/source4/pidl/tests/samba-ndr.pl @@ -262,20 +262,23 @@ is(TypeFunctionName("ndr_push", {TYPE => "STRUCT", NAME => "bar"}), "ndr_push_ST $generator = new Parse::Pidl::Samba4::NDR::Parser(); $generator->ParseElementPrint({ NAME => "x", TYPE => "rt", REPRESENTATION_TYPE => "rt", PROPERTIES => { noprint => 1}, - LEVELS => [ { TYPE => "DATA", DATA_TYPE => "rt"} ]}, "var", { "x" => "r->foobar" } ); + LEVELS => [ { TYPE => "DATA", DATA_TYPE => "rt"} ]}, + "ndr", "var", { "x" => "r->foobar" } ); is($generator->{res}, ""); $generator = new Parse::Pidl::Samba4::NDR::Parser(); $generator->ParseElementPrint({ NAME => "x", TYPE => "rt", REPRESENTATION_TYPE => "rt", PROPERTIES => {}, - LEVELS => [ { TYPE => "DATA", DATA_TYPE => "rt" }]}, "var", { "x" => "r->foobar" } ); + LEVELS => [ { TYPE => "DATA", DATA_TYPE => "rt" }]}, + "ndr", "var", { "x" => "r->foobar" } ); is($generator->{res}, "ndr_print_rt(ndr, \"x\", &var);\n"); # make sure that a print function for an element with value() set works $generator = new Parse::Pidl::Samba4::NDR::Parser(); $generator->ParseElementPrint({ NAME => "x", TYPE => "uint32", REPRESENTATION_TYPE => "uint32", PROPERTIES => { value => "23" }, - LEVELS => [ { TYPE => "DATA", DATA_TYPE => "uint32"} ]}, "var", { "x" => "r->foobar" } ); + LEVELS => [ { TYPE => "DATA", DATA_TYPE => "uint32"} ]}, + "ndr", "var", { "x" => "r->foobar" } ); is($generator->{res}, "ndr_print_uint32(ndr, \"x\", (ndr->flags & LIBNDR_PRINT_SET_VALUES)?23:var);\n"); $generator = new Parse::Pidl::Samba4::NDR::Parser(); |