diff options
author | Jelmer Vernooij <jelmer@samba.org> | 2007-04-22 15:59:34 +0000 |
---|---|---|
committer | Gerald (Jerry) Carter <jerry@samba.org> | 2007-10-10 14:51:23 -0500 |
commit | cc5ad07d84df94f8f2bc16fcb8015f1cf843c1e3 (patch) | |
tree | 5cc908a4bbd3c6294a1044dc79ffc7edad30cfdd /source4/pidl/tests/Util.pm | |
parent | b0d209087939c0de765349c80a22884b956f3f0f (diff) | |
download | samba-cc5ad07d84df94f8f2bc16fcb8015f1cf843c1e3.tar.gz samba-cc5ad07d84df94f8f2bc16fcb8015f1cf843c1e3.tar.bz2 samba-cc5ad07d84df94f8f2bc16fcb8015f1cf843c1e3.zip |
r22462: Fix test suite for ndr parser without using 'our'
(This used to be commit d491e60c70de8d78c333b317a143919c1a68c6d9)
Diffstat (limited to 'source4/pidl/tests/Util.pm')
-rw-r--r-- | source4/pidl/tests/Util.pm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/source4/pidl/tests/Util.pm b/source4/pidl/tests/Util.pm index a65cd89c55..48a08b5749 100644 --- a/source4/pidl/tests/Util.pm +++ b/source4/pidl/tests/Util.pm @@ -54,7 +54,8 @@ sub test_samba4_ndr ok(defined($header), "($name) generate generic header"); my $pndr = Parse::Pidl::NDR::Parse($pidl); ok(defined($pndr), "($name) generate NDR tree"); - my ($ndrheader,$ndrparser) = Parse::Pidl::Samba4::NDR::Parser::Parse($pndr, undef, undef); + my $generator = new Parse::Pidl::Samba4::NDR::Parser(); + my ($ndrheader,$ndrparser) = $generator->Parse($pndr, undef, undef); ok(defined($ndrparser), "($name) generate NDR parser"); ok(defined($ndrheader), "($name) generate NDR header"); |