diff options
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"); |