diff options
| author | Ilya Zakharevich <ilya@math.berkeley.edu> | 2003-10-29 06:00:18 -0800 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2003-11-02 18:22:16 +0000 |
| commit | 59ad941d06909cf9027c5fb10edca7d68fc7149b (patch) | |
| tree | 31cbe92fcf6d4df0a555139b93ead70dafd6824d /ext | |
| parent | df500c58e3444bfdd2437855ea268d802281b50e (diff) | |
| download | perl-59ad941d06909cf9027c5fb10edca7d68fc7149b.tar.gz | |
OS/2 build
Message-ID: <20031029220017.GA26384@math.berkeley.edu>
p4raw-id: //depot/perl@21620
Diffstat (limited to 'ext')
| -rw-r--r-- | ext/DynaLoader/DynaLoader_pm.PL | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/ext/DynaLoader/DynaLoader_pm.PL b/ext/DynaLoader/DynaLoader_pm.PL index 8a3e6e1e73..8dfb5d436c 100644 --- a/ext/DynaLoader/DynaLoader_pm.PL +++ b/ext/DynaLoader/DynaLoader_pm.PL @@ -229,6 +229,15 @@ sub bootstrap { " dynamic loading or has the $module module statically linked into it.)\n") unless defined(&dl_load_file); +EOT + +print OUT <<'EOT' if $^O eq 'os2'; + # Can dynaload, but cannot dynaload Perl modules... + die 'Dynaloaded Perl modules are not available in this build of Perl' if $OS2::is_static; + +EOT + +print OUT <<'EOT'; my @modparts = split(/::/,$module); my $modfname = $modparts[-1]; |