diff options
author | Gurusamy Sarathy <gsar@cpan.org> | 1999-02-16 04:09:47 +0000 |
---|---|---|
committer | Gurusamy Sarathy <gsar@cpan.org> | 1999-02-16 04:09:47 +0000 |
commit | cceca5ed003bac658cb0392a14bb2f26d434bd78 (patch) | |
tree | 286c2340276a7cbefe1899f0f01767791bb31ea4 /os2 | |
parent | a9fb271febef206f32659f8abc5f9029ae2f7a25 (diff) | |
download | perl-cceca5ed003bac658cb0392a14bb2f26d434bd78.tar.gz |
propagate PERL_VERSION everywhere, add to pod
p4raw-id: //depot/perl@2957
Diffstat (limited to 'os2')
-rw-r--r-- | os2/Makefile.SHs | 10 | ||||
-rw-r--r-- | os2/os2.c | 2 |
2 files changed, 6 insertions, 6 deletions
diff --git a/os2/Makefile.SHs b/os2/Makefile.SHs index c9bf39a1e2..ced556af9e 100644 --- a/os2/Makefile.SHs +++ b/os2/Makefile.SHs @@ -6,17 +6,17 @@ # Additional rules supported: perl_, aout_test, aout_install, use them # for a.out style perl (which may fork). -perl_version="5.00${PATCHLEVEL}_$SUBVERSION" +perl_fullversion="5.00${PERL_VERSION}_$PERL_SUBVERSION" case "$archname" in - *-thread*) perl_version="${perl_version}-threaded";; + *-thread*) perl_fullversion="${perl_fullversion}-threaded";; esac -dll_post="`echo $perl_version | sum | awk '{print $1}'`" +dll_post="`echo $perl_fullversion | sum | awk '{print $1}'`" dll_post="`printf '%x' $dll_post | tr '[a-z]' '[A-Z]'`" $spitshell >>Makefile <<!GROK!THIS! -PERL_VERSION = $perl_version +PERL_FULLVERSION = $perl_fullversion OPTIMIZE = $optimize AOUT_OPTIMIZE = \$(OPTIMIZE) @@ -60,7 +60,7 @@ $(PERL_DLL): $(obj) perl5.def perl$(OBJ_EXT) perl5.def: perl.linkexp echo "LIBRARY '$(PERL_DLL_BASE)' INITINSTANCE TERMINSTANCE" > $@ - echo DESCRIPTION "'Perl interpreter v$(PERL_VERSION), export autogenerated, built with $(CONFIG_ARGS)'" >>$@ + echo DESCRIPTION "'Perl interpreter v$(PERL_FULLVERSION), export autogenerated, built with $(CONFIG_ARGS)'" >>$@ echo STACKSIZE 32768 >>$@ echo CODE LOADONCALL >>$@ echo DATA LOADONCALL NONSHARED MULTIPLE >>$@ @@ -1315,7 +1315,7 @@ mod2fname(sv) #ifdef USE_THREADS sum++; /* Avoid conflict of DLLs in memory. */ #endif - sum += PATCHLEVEL * 200 + SUBVERSION * 2; /* */ + sum += PERL_VERSION * 200 + PERL_SUBVERSION * 2; /* */ fname[pos] = 'A' + (sum % 26); fname[pos + 1] = 'A' + (sum / 26 % 26); fname[pos + 2] = '\0'; |