r10388: Add version numbers (required for CPAN)
authorJelmer Vernooij <jelmer@samba.org>
Wed, 21 Sep 2005 12:57:18 +0000 (12:57 +0000)
committerGerald (Jerry) Carter <jerry@samba.org>
Wed, 10 Oct 2007 18:38:38 +0000 (13:38 -0500)
22 files changed:
source/pidl/lib/Parse/Pidl/Compat.pm
source/pidl/lib/Parse/Pidl/Dump.pm
source/pidl/lib/Parse/Pidl/Ethereal/Conformance.pm
source/pidl/lib/Parse/Pidl/Ethereal/NDR.pm
source/pidl/lib/Parse/Pidl/NDR.pm
source/pidl/lib/Parse/Pidl/ODL.pm
source/pidl/lib/Parse/Pidl/Samba/COM/Header.pm
source/pidl/lib/Parse/Pidl/Samba/COM/Proxy.pm
source/pidl/lib/Parse/Pidl/Samba/COM/Stub.pm
source/pidl/lib/Parse/Pidl/Samba/EJS.pm
source/pidl/lib/Parse/Pidl/Samba/EJSHeader.pm
source/pidl/lib/Parse/Pidl/Samba/Header.pm
source/pidl/lib/Parse/Pidl/Samba/NDR/Client.pm
source/pidl/lib/Parse/Pidl/Samba/NDR/Header.pm
source/pidl/lib/Parse/Pidl/Samba/NDR/Parser.pm
source/pidl/lib/Parse/Pidl/Samba/NDR/Server.pm
source/pidl/lib/Parse/Pidl/Samba/SWIG.pm
source/pidl/lib/Parse/Pidl/Samba/TDR.pm
source/pidl/lib/Parse/Pidl/Samba/Template.pm
source/pidl/lib/Parse/Pidl/Test.pm
source/pidl/lib/Parse/Pidl/Typelist.pm
source/pidl/lib/Parse/Pidl/Util.pm

index 39cb67fd71772bf5e1cd837d372ec3e391667d75..2e7d686249567e1f2636e0f8567fbf3b5f3ab186 100644 (file)
@@ -8,6 +8,9 @@ package Parse::Pidl::Compat;
 use Parse::Pidl::Util qw(has_property);
 use strict;
 
+use vars qw($VERSION);
+$VERSION = '0.01';
+
 my %supported_properties = (
        # interface
        "helpstring"            => ["INTERFACE", "FUNCTION"],
index 7f426c1c0bd8552086e42d90d30600e2d6adb81f..80219a8f1aab67428aeed2f3e67ad9afdc6d5b23 100644 (file)
@@ -7,6 +7,8 @@ package Parse::Pidl::Dump;
 
 use Exporter;
 
+use vars qw($VERSION);
+$VERSION = '0.01';
 @ISA = qw(Exporter);
 @EXPORT_OK = qw(DumpTypedef DumpStruct DumpEnum DumpBitmap DumpUnion DumpFunction);
 
index c12731eca258f3795c94da8b62344c4f41af95ac..706a259306a4c9b4aec6695bd4b54ef727778575 100644 (file)
@@ -6,6 +6,8 @@
 package Parse::Pidl::Ethereal::Conformance;
 
 require Exporter;
+use vars qw($VERSION);
+$VERSION = '0.01';
 
 @ISA = qw(Exporter);
 @EXPORT_OK = qw(ReadConformance);
index 4b1dd26876cc19192012a93a9db92f91d3239ac5..8441ea25b9028fb6997d5e6ee559e3cf43fb2d69 100644 (file)
@@ -15,6 +15,9 @@ use Parse::Pidl::NDR;
 use Parse::Pidl::Dump qw(DumpTypedef DumpFunction);
 use Parse::Pidl::Ethereal::Conformance qw(ReadConformance);
 
+use vars qw($VERSION);
+$VERSION = '0.01';
+
 my @ett;
 
 my %hf_used = ();
index e00a0c98281aa5c96a82da4dc7679d2a301287a2..42c9fd133b75c0861832c63ff19bbc50394bfb8e 100644 (file)
@@ -8,6 +8,8 @@
 package Parse::Pidl::NDR;
 
 require Exporter;
+use vars qw($VERSION);
+$VERSION = '0.01';
 @ISA = qw(Exporter);
 @EXPORT = qw(GetPrevLevel GetNextLevel ContainsDeferred);
 
index 03d66bfc45df0ff607dcd9e6fb1e99c51d4016e6..082deaea1d7e7b09e36003c6fc322b3b9fc351ae 100644 (file)
@@ -8,6 +8,9 @@ use Parse::Pidl::Util qw(has_property);
 use Parse::Pidl::Typelist qw(hasType getType);
 use strict;
 
+use vars qw($VERSION);
+$VERSION = '0.01';
+
 #####################################################################
 # find an interface in an array of interfaces
 sub get_interface($$)
index 7b6c4db212bdfcc7045dbd21c2451562b08fc5bb..0289a688ba1be954e16a43b7aa9f5903870addee 100644 (file)
@@ -6,6 +6,9 @@ package Parse::Pidl::Samba::COM::Header;
 use Parse::Pidl::Typelist;
 use Parse::Pidl::Util qw(has_property);
 
+use vars qw($VERSION);
+$VERSION = '0.01';
+
 use strict;
 
 sub GetArgumentProtoList($)
index c94ef59ae9dce6065317c3b6a8ee71906c88884f..ab56d87492c9b64366f151f004b5d569055af5b1 100644 (file)
@@ -9,6 +9,9 @@ package Parse::Pidl::Samba::COM::Proxy;
 use Parse::Pidl::Samba::COM::Header;
 use Parse::Pidl::Util qw(has_property);
 
+use vars qw($VERSION);
+$VERSION = '0.01';
+
 use strict;
 
 my($res);
index 785c34fc770dc9c4f8fd5c687e1ef7a6df3f9e23..17b33a687228d610e248d8919fbeb032c07b2b51 100644 (file)
@@ -10,6 +10,9 @@ package Parse::Pidl::Samba::COM::Stub;
 use Parse::Pidl::Util qw(has_property);
 use strict;
 
+use vars qw($VERSION);
+$VERSION = '0.01';
+
 my($res);
 
 sub pidl($)
index 743139c8cd3bc6f61aa8cc0976f0164ea7d62de7..2cac7d81affeac6c6306f18cd06abbd53da317c9 100644 (file)
@@ -10,6 +10,9 @@ use strict;
 use Parse::Pidl::Typelist;
 use Parse::Pidl::Util qw(has_property);
 
+use vars qw($VERSION);
+$VERSION = '0.01';
+
 my($res);
 my %constants;
 
index 81c75705dec594ea72f7017efbf7fdee3835e4c7..fed717cad053b0e0ca366981785e8d23cd042787 100644 (file)
@@ -9,6 +9,9 @@ use strict;
 use Parse::Pidl::Typelist;
 use Parse::Pidl::Util qw(has_property);
 
+use vars qw($VERSION);
+$VERSION = '0.01';
+
 my($res);
 
 sub pidl ($)
index d88b37e229c8894a917fa152cda1163f9f06796b..ed8952e746665dc60349b31a7066dba6bbbb18fe 100644 (file)
@@ -11,6 +11,9 @@ use Parse::Pidl::Typelist qw(mapType);
 use Parse::Pidl::Util qw(has_property is_constant);
 use Parse::Pidl::NDR qw(GetNextLevel GetPrevLevel);
 
+use vars qw($VERSION);
+$VERSION = '0.01';
+
 my($res);
 my($tab_depth);
 
index 126dbc3ba9c14f38205f0f69966c0b019f8fe67d..10b8dc71d8c584cf380825e2bc3a9a08bde64a56 100644 (file)
@@ -5,6 +5,9 @@
 
 package Parse::Pidl::Samba::NDR::Client;
 
+use vars qw($VERSION);
+$VERSION = '0.01';
+
 use strict;
 
 my($res);
index 9aa0ed8daf7ca48d287ad20bb6f8a934db3515bf..daf7ba0238fa9231e59b4824eb1eef4382957d54 100644 (file)
@@ -12,6 +12,9 @@ use Parse::Pidl::Util qw(has_property is_constant);
 use Parse::Pidl::NDR qw(GetNextLevel GetPrevLevel);
 use Parse::Pidl::Samba::NDR::Parser;
 
+use vars qw($VERSION);
+$VERSION = '0.01';
+
 my($res);
 my($tab_depth);
 
index 513fa0826ddcedaf6ed5c15089fc6df3cd043c7c..3f08cbb52739dd582c2a933d5722bdfad69416bb 100644 (file)
@@ -12,6 +12,9 @@ use Parse::Pidl::Typelist qw(hasType getType mapType);
 use Parse::Pidl::Util qw(has_property ParseExpr);
 use Parse::Pidl::NDR qw(GetPrevLevel GetNextLevel ContainsDeferred);
 
+use vars qw($VERSION);
+$VERSION = '0.01';
+
 # list of known types
 my %typefamily;
 
index a8c159572bcc602cece1aa5e4184388c5caef37c..99982e4ad12623874e1e7efd7c26b5143a3e781e 100644 (file)
@@ -8,6 +8,9 @@ package Parse::Pidl::Samba::NDR::Server;
 
 use strict;
 
+use vars qw($VERSION);
+$VERSION = '0.01';
+
 my($res);
 
 sub pidl($)
index 409095804f6796a450b22d7143d3540704246ee4..471c3e99277e8ab2e5cfb11aa8ce97d438b31163 100644 (file)
@@ -5,6 +5,9 @@
 
 package Parse::Pidl::Samba::SWIG;
 
+use vars qw($VERSION);
+$VERSION = '0.01';
+
 use strict;
 
 sub pidl($)
index 124cb61bb4decc2ef4479fef11d171267f44e379..5d3d236e4334434f66520cf5d5f6bcf3e96fd860 100644 (file)
@@ -6,6 +6,9 @@
 package Parse::Pidl::Samba::TDR;
 use Parse::Pidl::Util qw(has_property ParseExpr is_constant);
 
+use vars qw($VERSION);
+$VERSION = '0.01';
+
 use strict;
 
 my $ret = "";
index eb71b6d7076ebcf835ea965c528e7e6beb93e36d..fea4b47deea5499fe13495c679730fed86384be4 100644 (file)
@@ -5,6 +5,9 @@
 
 package Parse::Pidl::Samba::Template;
 
+use vars qw($VERSION);
+$VERSION = '0.01';
+
 use strict;
 
 my($res);
index 34ea80c95cd02d4b522b99c5cf30408c4e4e3d26..66f5c735959bfe1603bf559a3bc28bb7d6ef67d7 100644 (file)
@@ -8,6 +8,8 @@ use strict;
 use Parse::Pidl::Util;
 use Getopt::Long;
 
+use vars qw($VERSION);
+$VERSION = '0.01';
 my $cc = $ENV{CC};
 my @cflags = split / /, $ENV{CFLAGS};
 my @ldflags = split / /, $ENV{LDFLAGS};
index 10a4baf7e7a2662350bcf384f2998f6900e18348..7dfbe761de105939a2ccef9543f2cdc213e744fd 100644 (file)
@@ -8,6 +8,8 @@ package Parse::Pidl::Typelist;
 require Exporter;
 @ISA = qw(Exporter);
 @EXPORT = qw(hasType getType mapType);
+use vars qw($VERSION);
+$VERSION = '0.01';
 
 use Parse::Pidl::Util qw(has_property);
 use strict;
index 572df0dc097b76d5cd3ceea9259d0175f6e08262..fec1301a59d46ef21338cc154c3befbd6759e784 100644 (file)
@@ -7,6 +7,8 @@ package Parse::Pidl::Util;
 require Exporter;
 @ISA = qw(Exporter);
 @EXPORT = qw(has_property property_matches ParseExpr is_constant make_str);
+use vars qw($VERSION);
+$VERSION = '0.01';
 
 use strict;