diff options
| author | Jelmer Vernooij <jelmer@samba.org> | 2007-02-26 01:03:19 +0000 |
|---|---|---|
| committer | Gerald (Jerry) Carter <jerry@samba.org> | 2007-10-10 14:48:54 -0500 |
| commit | b8c219a270e50f165a326c3657618c78e2ff58c5 (patch) | |
| tree | 2841c148f970b8392e0111a5b7e5d9c36d2bb203 /source4/pidl/lib/Parse/Pidl | |
| parent | 0e617102ef2091915e43296ef52cede1fcf173c8 (diff) | |
| download | samba-b8c219a270e50f165a326c3657618c78e2ff58c5.tar.gz samba-b8c219a270e50f165a326c3657618c78e2ff58c5.tar.bz2 samba-b8c219a270e50f165a326c3657618c78e2ff58c5.zip | |
r21534: Add some more tests for wireshark.
(This used to be commit b10432096181cf8e7d729e58a5ab54fac5eaa5fe)
Diffstat (limited to 'source4/pidl/lib/Parse/Pidl')
| -rw-r--r-- | source4/pidl/lib/Parse/Pidl/Samba4/NDR/Parser.pm | 1 | ||||
| -rw-r--r-- | source4/pidl/lib/Parse/Pidl/Wireshark/NDR.pm | 6 |
2 files changed, 3 insertions, 4 deletions
diff --git a/source4/pidl/lib/Parse/Pidl/Samba4/NDR/Parser.pm b/source4/pidl/lib/Parse/Pidl/Samba4/NDR/Parser.pm index b6209d9f9a..e1a19a7d3b 100644 --- a/source4/pidl/lib/Parse/Pidl/Samba4/NDR/Parser.pm +++ b/source4/pidl/lib/Parse/Pidl/Samba4/NDR/Parser.pm @@ -2479,7 +2479,6 @@ sub ParseTypePull($$$$) pidl "ndr_pull_restore_relative_base_offset(ndr, _save_relative_base_offset);" if defined(has_property($e, "relative_base")); } - sub ParseTypePullFunction($$) { my ($e, $varname) = @_; diff --git a/source4/pidl/lib/Parse/Pidl/Wireshark/NDR.pm b/source4/pidl/lib/Parse/Pidl/Wireshark/NDR.pm index 914d54d985..db7d2cf241 100644 --- a/source4/pidl/lib/Parse/Pidl/Wireshark/NDR.pm +++ b/source4/pidl/lib/Parse/Pidl/Wireshark/NDR.pm @@ -18,7 +18,7 @@ package Parse::Pidl::Wireshark::NDR; use Exporter; @ISA = qw(Exporter); -@EXPORT_OK = qw(field2name @ett %res PrintIdl StripPrefixes); +@EXPORT_OK = qw(field2name @ett %res PrintIdl StripPrefixes %hf_used RegisterInterfaceHandoff $conformance register_hf_field CheckUsed); use strict; use Parse::Pidl qw(error warning); @@ -34,11 +34,11 @@ $VERSION = '0.01'; our @ett; -my %hf_used = (); +our %hf_used = (); my %return_types = (); my %dissector_used = (); -my $conformance = undef; +our $conformance = undef; my %ptrtype_mappings = ( "unique" => "NDR_POINTER_UNIQUE", |