summaryrefslogtreecommitdiff
path: root/makedef.pl
diff options
context:
space:
mode:
authorIlya Zakharevich <ilya@math.berkeley.edu>2001-05-19 00:08:46 -0400
committerJarkko Hietaniemi <jhi@iki.fi>2001-05-20 11:12:14 +0000
commit1102eebe5ec184d02a12b0ae21384e5605226f7d (patch)
treee3c481201c079d3478c0b6bebe7da51182824d65 /makedef.pl
parentbea19d3fe5b254bd582228ebbf5d315c969caf0e (diff)
downloadperl-1102eebe5ec184d02a12b0ae21384e5605226f7d.tar.gz
DLL descriptions on OS/2
Message-ID: <20010519040846.A16969@math.ohio-state.edu> p4raw-id: //depot/perl@10167
Diffstat (limited to 'makedef.pl')
-rw-r--r--makedef.pl4
1 files changed, 3 insertions, 1 deletions
diff --git a/makedef.pl b/makedef.pl
index 948066beb0..56008efb22 100644
--- a/makedef.pl
+++ b/makedef.pl
@@ -151,9 +151,11 @@ elsif ($PLATFORM eq 'os2') {
($v = $]) =~ s/(\d\.\d\d\d)(\d\d)$/$1_$2/;
$v .= '-thread' if $ARCHNAME =~ /-thread/;
($dll = $define{PERL_DLL}) =~ s/\.dll$//i;
+ $d = "DESCRIPTION '\@#perl5-porters\@perl.org:$v#\@ Perl interpreter, configured as $CONFIG_ARGS'";
+ $d = substr($d, 0, 249) . "...'" if length $d > 253;
print <<"---EOP---";
LIBRARY '$dll' INITINSTANCE TERMINSTANCE
-DESCRIPTION '\@#perl5-porters\@perl.org:$v#\@ Perl interpreter'
+$d
STACKSIZE 32768
CODE LOADONCALL
DATA LOADONCALL NONSHARED MULTIPLE