1
0
mirror of https://github.com/samba-team/samba.git synced 2025-08-03 04:22:09 +03:00

r8275: possibly a more portable way to export symbols in perl?

(This used to be commit d5153d16e1)
This commit is contained in:
Andrew Tridgell
2005-07-10 01:43:10 +00:00
committed by Gerald (Jerry) Carter
parent 514ce32a89
commit 1e5b309b4f
3 changed files with 9 additions and 6 deletions

View File

@ -7,8 +7,9 @@
package Parse::Pidl::NDR; package Parse::Pidl::NDR;
use Exporter 'import'; require Exporter;
@EXPORT_OK = qw(GetPrevLevel GetNextLevel); @ISA = qw(Exporter);
@EXPORT = qw(GetPrevLevel GetNextLevel);
use strict; use strict;
use Parse::Pidl::Typelist qw(hasType getType); use Parse::Pidl::Typelist qw(hasType getType);

View File

@ -5,8 +5,9 @@
package Parse::Pidl::Typelist; package Parse::Pidl::Typelist;
use Exporter 'import'; require Exporter;
@EXPORT_OK = qw(hasType getType); @ISA = qw(Exporter);
@EXPORT = qw(hasType getType);
use Parse::Pidl::Util qw(has_property); use Parse::Pidl::Util qw(has_property);
use strict; use strict;

View File

@ -4,8 +4,9 @@
# released under the GNU GPL # released under the GNU GPL
package Parse::Pidl::Util; package Parse::Pidl::Util;
use Exporter 'import'; require Exporter;
@EXPORT_OK = qw(has_property property_matches ParseExpr); @ISA = qw(Exporter);
@EXPORT = qw(has_property property_matches ParseExpr);
use strict; use strict;