5.005
上传用户:tsgydb
上传日期:2007-04-14
资源大小:10674k
文件大小:7k
源码类别:

MySQL数据库

开发平台:

Visual C++

  1. diff -rc perl5.005.orig/Configure perl5.005/Configure
  2. *** perl5.005.orig/Configure Wed Jul 15 08:05:44 1998
  3. --- perl5.005/Configure Sun Nov 12 21:30:40 2000
  4. ***************
  5. *** 234,239 ****
  6. --- 234,240 ----
  7.   nm=''
  8.   nroff=''
  9.   perl=''
  10. + perllibs=''
  11.   pg=''
  12.   pmake=''
  13.   pr=''
  14. ***************
  15. *** 11279,11284 ****
  16. --- 11280,11293 ----
  17.   shift
  18.   extensions="$*"
  19.   
  20. + : Remove libraries needed only for extensions
  21. + : The appropriate ext/Foo/Makefile.PL will add them back in, if
  22. + : necessary.
  23. + set X `echo " $libs " | 
  24. +   sed -e 's@ -lndbm @ @' -e 's@ -lgdbm @ @' -e 's@ -ldbm @ @' -e 's@ -ldb @ @'` 
  25. + shift
  26. + perllibs="$*"
  27.   : Remove build directory name from cppstdin so it can be used from
  28.   : either the present location or the final installed location.
  29.   echo " "
  30. ***************
  31. *** 11804,11809 ****
  32. --- 11813,11819 ----
  33.   patchlevel='$patchlevel'
  34.   path_sep='$path_sep'
  35.   perl='$perl'
  36. + perllibs='$perllibs'
  37.   perladmin='$perladmin'
  38.   perlpath='$perlpath'
  39.   pg='$pg'
  40. diff -rc perl5.005.orig/Makefile.SH perl5.005/Makefile.SH
  41. *** perl5.005.orig/Makefile.SH Sun Jul 19 08:06:35 1998
  42. --- perl5.005/Makefile.SH Sun Nov 12 21:30:40 2000
  43. ***************
  44. *** 150,156 ****
  45.   ext = $(dynamic_ext) $(static_ext) $(nonxs_ext)
  46.   DYNALOADER = lib/auto/DynaLoader/DynaLoader$(LIB_EXT)
  47.   
  48. ! libs = $libs $cryptlib
  49.   
  50.   public = perl $suidperl utilities translators
  51.   
  52. --- 150,156 ----
  53.   ext = $(dynamic_ext) $(static_ext) $(nonxs_ext)
  54.   DYNALOADER = lib/auto/DynaLoader/DynaLoader$(LIB_EXT)
  55.   
  56. ! libs = $perllibs $cryptlib
  57.   
  58.   public = perl $suidperl utilities translators
  59.   
  60. diff -rc perl5.005.orig/lib/ExtUtils/Embed.pm perl5.005/lib/ExtUtils/Embed.pm
  61. *** perl5.005.orig/lib/ExtUtils/Embed.pm Wed Jul 22 07:45:02 1998
  62. --- perl5.005/lib/ExtUtils/Embed.pm Sun Nov 12 21:30:40 2000
  63. ***************
  64. *** 194,200 ****
  65.       @path = $path ? split(/:/, $path) : @INC;
  66.   
  67.       push(@potential_libs, @link_args)    if scalar @link_args;
  68. !     push(@potential_libs, $Config{libs}) if defined $std;
  69.   
  70.       push(@mods, static_ext()) if $std;
  71.   
  72. --- 194,200 ----
  73.       @path = $path ? split(/:/, $path) : @INC;
  74.   
  75.       push(@potential_libs, @link_args)    if scalar @link_args;
  76. !     push(@potential_libs, $Config{perllibs}) if defined $std;
  77.   
  78.       push(@mods, static_ext()) if $std;
  79.   
  80. diff -rc perl5.005.orig/lib/ExtUtils/Liblist.pm perl5.005/lib/ExtUtils/Liblist.pm
  81. *** perl5.005.orig/lib/ExtUtils/Liblist.pm Wed Jul 22 07:09:42 1998
  82. --- perl5.005/lib/ExtUtils/Liblist.pm Sun Nov 12 21:30:40 2000
  83. ***************
  84. *** 16,33 ****
  85.   
  86.   sub _unix_os2_ext {
  87.       my($self,$potential_libs, $verbose) = @_;
  88. !     if ($^O =~ 'os2' and $Config{libs}) { 
  89.    # Dynamic libraries are not transitive, so we may need including
  90.    # the libraries linked against perl.dll again.
  91.   
  92.    $potential_libs .= " " if $potential_libs;
  93. !  $potential_libs .= $Config{libs};
  94.       }
  95.       return ("", "", "", "") unless $potential_libs;
  96.       warn "Potential libraries are '$potential_libs':n" if $verbose;
  97.   
  98.       my($so)   = $Config{'so'};
  99. !     my($libs) = $Config{'libs'};
  100.       my $Config_libext = $Config{lib_ext} || ".a";
  101.   
  102.   
  103. --- 16,33 ----
  104.   
  105.   sub _unix_os2_ext {
  106.       my($self,$potential_libs, $verbose) = @_;
  107. !     if ($^O =~ 'os2' and $Config{perllibs}) { 
  108.    # Dynamic libraries are not transitive, so we may need including
  109.    # the libraries linked against perl.dll again.
  110.   
  111.    $potential_libs .= " " if $potential_libs;
  112. !  $potential_libs .= $Config{perllibs};
  113.       }
  114.       return ("", "", "", "") unless $potential_libs;
  115.       warn "Potential libraries are '$potential_libs':n" if $verbose;
  116.   
  117.       my($so)   = $Config{'so'};
  118. !     my($libs) = $Config{'perllibs'};
  119.       my $Config_libext = $Config{lib_ext} || ".a";
  120.   
  121.   
  122. ***************
  123. *** 290,296 ****
  124.                    $self->{CCFLAS}   || $Config{'ccflags'};
  125.     @crtls = ( ($dbgqual =~ m-/Debug-i ? $Config{'dbgprefix'} : '')
  126.                 . 'PerlShr/Share' );
  127. !   push(@crtls, grep { not /(/ } split /s+/, $Config{'libs'});
  128.     push(@crtls, grep { not /(/ } split /s+/, $Config{'libc'});
  129.     # In general, we pass through the basic libraries from %Config unchanged.
  130.     # The one exception is that if we're building in the Perl source tree, and
  131. --- 290,296 ----
  132.                    $self->{CCFLAS}   || $Config{'ccflags'};
  133.     @crtls = ( ($dbgqual =~ m-/Debug-i ? $Config{'dbgprefix'} : '')
  134.                 . 'PerlShr/Share' );
  135. !   push(@crtls, grep { not /(/ } split /s+/, $Config{'perllibs'});
  136.     push(@crtls, grep { not /(/ } split /s+/, $Config{'libc'});
  137.     # In general, we pass through the basic libraries from %Config unchanged.
  138.     # The one exception is that if we're building in the Perl source tree, and
  139. ***************
  140. *** 598,604 ****
  141.   =item *
  142.   
  143.   If C<$potential_libs> is empty, the return value will be empty.
  144. ! Otherwise, the libraries specified by C<$Config{libs}> (see Config.pm)
  145.   will be appended to the list of C<$potential_libs>.  The libraries
  146.   will be searched for in the directories specified in C<$potential_libs>
  147.   as well as in C<$Config{libpth}>. For each library that is found,  a
  148. --- 598,604 ----
  149.   =item *
  150.   
  151.   If C<$potential_libs> is empty, the return value will be empty.
  152. ! Otherwise, the libraries specified by C<$Config{perllibs}> (see Config.pm)
  153.   will be appended to the list of C<$potential_libs>.  The libraries
  154.   will be searched for in the directories specified in C<$potential_libs>
  155.   as well as in C<$Config{libpth}>. For each library that is found,  a
  156. diff -rc perl5.005.orig/lib/ExtUtils/MM_Unix.pm perl5.005/lib/ExtUtils/MM_Unix.pm
  157. *** perl5.005.orig/lib/ExtUtils/MM_Unix.pm Tue Jul 14 04:39:12 1998
  158. --- perl5.005/lib/ExtUtils/MM_Unix.pm Sun Nov 12 21:30:41 2000
  159. ***************
  160. *** 2281,2287 ****
  161.   MAP_STATIC    = ",
  162.   join(" \nt", reverse sort keys %static), "
  163.   
  164. ! MAP_PRELIBS   = $Config::Config{libs} $Config::Config{cryptlib}
  165.   ";
  166.   
  167.       if (defined $libperl) {
  168. --- 2281,2287 ----
  169.   MAP_STATIC    = ",
  170.   join(" \nt", reverse sort keys %static), "
  171.   
  172. ! MAP_PRELIBS   = $Config::Config{perllibs} $Config::Config{cryptlib}
  173.   ";
  174.   
  175.       if (defined $libperl) {
  176. diff -rc perl5.005.orig/myconfig perl5.005/myconfig
  177. *** perl5.005.orig/myconfig Fri Apr  3 01:20:35 1998
  178. --- perl5.005/myconfig Sun Nov 12 21:30:41 2000
  179. ***************
  180. *** 34,40 ****
  181.     Linker and Libraries:
  182.       ld='$ld', ldflags ='$ldflags'
  183.       libpth=$libpth
  184. !     libs=$libs
  185.       libc=$libc, so=$so, useshrplib=$useshrplib, libperl=$libperl
  186.     Dynamic Linking:
  187.       dlsrc=$dlsrc, dlext=$dlext, d_dlsymun=$d_dlsymun, ccdlflags='$ccdlflags'
  188. --- 34,40 ----
  189.     Linker and Libraries:
  190.       ld='$ld', ldflags ='$ldflags'
  191.       libpth=$libpth
  192. !     libs=$perllibs
  193.       libc=$libc, so=$so, useshrplib=$useshrplib, libperl=$libperl
  194.     Dynamic Linking:
  195.       dlsrc=$dlsrc, dlext=$dlext, d_dlsymun=$d_dlsymun, ccdlflags='$ccdlflags'
  196. diff -rc perl5.005.orig/patchlevel.h perl5.005/patchlevel.h
  197. *** perl5.005.orig/patchlevel.h Wed Jul 22 19:22:01 1998
  198. --- perl5.005/patchlevel.h Sun Nov 12 21:30:41 2000
  199. ***************
  200. *** 39,44 ****
  201. --- 39,45 ----
  202.    */
  203.   static char *local_patches[] = {
  204.    NULL
  205. +  ,"NODB-1.0 - remove -ldb from core perl binary."
  206.    ,NULL
  207.   };
  208.