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

MySQL数据库

开发平台:

Visual C++

  1. diff -cr perl-5.6.0.orig/Configure perl-5.6.0/Configure
  2. *** perl-5.6.0.orig/Configure Wed Mar 22 20:36:37 2000
  3. --- perl-5.6.0/Configure Sun Sep 17 23:40:15 2000
  4. ***************
  5. *** 217,222 ****
  6. --- 217,223 ----
  7.   nm=''
  8.   nroff=''
  9.   perl=''
  10. + perllibs=''
  11.   pg=''
  12.   pmake=''
  13.   pr=''
  14. ***************
  15. *** 14971,14976 ****
  16. --- 14972,14985 ----
  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. *** 15640,15645 ****
  32. --- 15649,15655 ----
  33.   path_sep='$path_sep'
  34.   perl5='$perl5'
  35.   perl='$perl'
  36. + perllibs='$perllibs'
  37.   perladmin='$perladmin'
  38.   perlpath='$perlpath'
  39.   pg='$pg'
  40. diff -cr perl-5.6.0.orig/Makefile.SH perl-5.6.0/Makefile.SH
  41. *** perl-5.6.0.orig/Makefile.SH Sat Mar 11 16:05:24 2000
  42. --- perl-5.6.0/Makefile.SH Sun Sep 17 23:40:15 2000
  43. ***************
  44. *** 70,76 ****
  45.    *) shrpldflags="$shrpldflags -b noentry"
  46.    ;;
  47.    esac
  48. !          shrpldflags="$shrpldflags $ldflags $libs $cryptlib"
  49.    linklibperl="-L $archlibexp/CORE -L `pwd | sed 's//UU$//'` -lperl"
  50.    ;;
  51.    hpux*)
  52. --- 70,76 ----
  53.    *) shrpldflags="$shrpldflags -b noentry"
  54.    ;;
  55.    esac
  56. !          shrpldflags="$shrpldflags $ldflags $perllibs $cryptlib"
  57.    linklibperl="-L $archlibexp/CORE -L `pwd | sed 's//UU$//'` -lperl"
  58.    ;;
  59.    hpux*)
  60. ***************
  61. *** 176,182 ****
  62.   ext = $(dynamic_ext) $(static_ext) $(nonxs_ext)
  63.   DYNALOADER = lib/auto/DynaLoader/DynaLoader$(LIB_EXT)
  64.   
  65. ! libs = $libs $cryptlib
  66.   
  67.   public = perl $suidperl utilities translators
  68.   
  69. --- 176,182 ----
  70.   ext = $(dynamic_ext) $(static_ext) $(nonxs_ext)
  71.   DYNALOADER = lib/auto/DynaLoader/DynaLoader$(LIB_EXT)
  72.   
  73. ! libs = $perllibs $cryptlib
  74.   
  75.   public = perl $suidperl utilities translators
  76.   
  77. ***************
  78. *** 333,339 ****
  79.   case "$osname" in
  80.   aix)
  81.    $spitshell >>Makefile <<!GROK!THIS!
  82. ! LIBS = $libs
  83.   # In AIX we need to change this for building Perl itself from
  84.   # its earlier definition (which is for building external
  85.   # extensions *after* Perl has been built and installed)
  86. --- 333,339 ----
  87.   case "$osname" in
  88.   aix)
  89.    $spitshell >>Makefile <<!GROK!THIS!
  90. ! LIBS = $perllibs
  91.   # In AIX we need to change this for building Perl itself from
  92.   # its earlier definition (which is for building external
  93.   # extensions *after* Perl has been built and installed)
  94. diff -cr perl-5.6.0.orig/lib/ExtUtils/Embed.pm perl-5.6.0/lib/ExtUtils/Embed.pm
  95. *** perl-5.6.0.orig/lib/ExtUtils/Embed.pm Sun Jan 23 12:08:32 2000
  96. --- perl-5.6.0/lib/ExtUtils/Embed.pm Sun Sep 17 23:40:15 2000
  97. ***************
  98. *** 193,199 ****
  99.       @path = $path ? split(/:/, $path) : @INC;
  100.   
  101.       push(@potential_libs, @link_args)    if scalar @link_args;
  102. !     push(@potential_libs, $Config{libs}) if defined $std;
  103.   
  104.       push(@mods, static_ext()) if $std;
  105.   
  106. --- 193,199 ----
  107.       @path = $path ? split(/:/, $path) : @INC;
  108.   
  109.       push(@potential_libs, @link_args)    if scalar @link_args;
  110. !     push(@potential_libs, $Config{perllibs}) if defined $std;
  111.   
  112.       push(@mods, static_ext()) if $std;
  113.   
  114. diff -cr perl-5.6.0.orig/lib/ExtUtils/Liblist.pm perl-5.6.0/lib/ExtUtils/Liblist.pm
  115. *** perl-5.6.0.orig/lib/ExtUtils/Liblist.pm Wed Mar 22 16:16:31 2000
  116. --- perl-5.6.0/lib/ExtUtils/Liblist.pm Sun Sep 17 23:40:15 2000
  117. ***************
  118. *** 17,34 ****
  119.   
  120.   sub _unix_os2_ext {
  121.       my($self,$potential_libs, $verbose) = @_;
  122. !     if ($^O =~ 'os2' and $Config{libs}) { 
  123.    # Dynamic libraries are not transitive, so we may need including
  124.    # the libraries linked against perl.dll again.
  125.   
  126.    $potential_libs .= " " if $potential_libs;
  127. !  $potential_libs .= $Config{libs};
  128.       }
  129.       return ("", "", "", "") unless $potential_libs;
  130.       warn "Potential libraries are '$potential_libs':n" if $verbose;
  131.   
  132.       my($so)   = $Config{'so'};
  133. !     my($libs) = $Config{'libs'};
  134.       my $Config_libext = $Config{lib_ext} || ".a";
  135.   
  136.   
  137. --- 17,34 ----
  138.   
  139.   sub _unix_os2_ext {
  140.       my($self,$potential_libs, $verbose) = @_;
  141. !     if ($^O =~ 'os2' and $Config{perllibs}) { 
  142.    # Dynamic libraries are not transitive, so we may need including
  143.    # the libraries linked against perl.dll again.
  144.   
  145.    $potential_libs .= " " if $potential_libs;
  146. !  $potential_libs .= $Config{perllibs};
  147.       }
  148.       return ("", "", "", "") unless $potential_libs;
  149.       warn "Potential libraries are '$potential_libs':n" if $verbose;
  150.   
  151.       my($so)   = $Config{'so'};
  152. !     my($libs) = $Config{'perllibs'};
  153.       my $Config_libext = $Config{lib_ext} || ".a";
  154.   
  155.   
  156. ***************
  157. *** 198,204 ****
  158.       my $BC = 1 if $cc =~ /^bcc/i;
  159.       my $GC = 1 if $cc =~ /^gcc/i;
  160.       my $so = $Config{'so'};
  161. !     my $libs = $Config{'libs'};
  162.       my $libpth = $Config{'libpth'};
  163.       my $libext = $Config{'lib_ext'} || ".lib";
  164.   
  165. --- 198,204 ----
  166.       my $BC = 1 if $cc =~ /^bcc/i;
  167.       my $GC = 1 if $cc =~ /^gcc/i;
  168.       my $so = $Config{'so'};
  169. !     my $libs = $Config{'perllibs'};
  170.       my $libpth = $Config{'libpth'};
  171.       my $libext = $Config{'lib_ext'} || ".lib";
  172.   
  173. ***************
  174. *** 338,344 ****
  175.                    $self->{CCFLAS}   || $Config{'ccflags'};
  176.     @crtls = ( ($dbgqual =~ m-/Debug-i ? $Config{'dbgprefix'} : '')
  177.                 . 'PerlShr/Share' );
  178. !   push(@crtls, grep { not /(/ } split /s+/, $Config{'libs'});
  179.     push(@crtls, grep { not /(/ } split /s+/, $Config{'libc'});
  180.     # In general, we pass through the basic libraries from %Config unchanged.
  181.     # The one exception is that if we're building in the Perl source tree, and
  182. --- 338,344 ----
  183.                    $self->{CCFLAS}   || $Config{'ccflags'};
  184.     @crtls = ( ($dbgqual =~ m-/Debug-i ? $Config{'dbgprefix'} : '')
  185.                 . 'PerlShr/Share' );
  186. !   push(@crtls, grep { not /(/ } split /s+/, $Config{'perllibs'});
  187.     push(@crtls, grep { not /(/ } split /s+/, $Config{'libc'});
  188.     # In general, we pass through the basic libraries from %Config unchanged.
  189.     # The one exception is that if we're building in the Perl source tree, and
  190. ***************
  191. *** 624,630 ****
  192.   =item *
  193.   
  194.   If C<$potential_libs> is empty, the return value will be empty.
  195. ! Otherwise, the libraries specified by C<$Config{libs}> (see Config.pm)
  196.   will be appended to the list of C<$potential_libs>.  The libraries
  197.   will be searched for in the directories specified in C<$potential_libs>,
  198.   C<$Config{libpth}>, and in C<$Config{installarchlib}/CORE>.
  199. --- 624,630 ----
  200.   =item *
  201.   
  202.   If C<$potential_libs> is empty, the return value will be empty.
  203. ! Otherwise, the libraries specified by C<$Config{perllibs}> (see Config.pm)
  204.   will be appended to the list of C<$potential_libs>.  The libraries
  205.   will be searched for in the directories specified in C<$potential_libs>,
  206.   C<$Config{libpth}>, and in C<$Config{installarchlib}/CORE>.
  207. ***************
  208. *** 668,674 ****
  209.   alphanumeric characters are treated as flags.  Unknown flags will be ignored.
  210.   
  211.   An entry that matches C</:nodefault/i> disables the appending of default
  212. ! libraries found in C<$Config{libs}> (this should be only needed very rarely).
  213.   
  214.   An entry that matches C</:nosearch/i> disables all searching for
  215.   the libraries specified after it.  Translation of C<-Lfoo> and
  216. --- 668,674 ----
  217.   alphanumeric characters are treated as flags.  Unknown flags will be ignored.
  218.   
  219.   An entry that matches C</:nodefault/i> disables the appending of default
  220. ! libraries found in C<$Config{perllibs}> (this should be only needed very rarely).
  221.   
  222.   An entry that matches C</:nosearch/i> disables all searching for
  223.   the libraries specified after it.  Translation of C<-Lfoo> and
  224. ***************
  225. *** 678,684 ****
  226.   
  227.   An entry that matches C</:search/i> reenables searching for
  228.   the libraries specified after it.  You can put it at the end to
  229. ! enable searching for default libraries specified by C<$Config{libs}>.
  230.   
  231.   =item *
  232.   
  233. --- 678,684 ----
  234.   
  235.   An entry that matches C</:search/i> reenables searching for
  236.   the libraries specified after it.  You can put it at the end to
  237. ! enable searching for default libraries specified by C<$Config{perllibs}>.
  238.   
  239.   =item *
  240.   
  241. diff -cr perl-5.6.0.orig/lib/ExtUtils/MM_Unix.pm perl-5.6.0/lib/ExtUtils/MM_Unix.pm
  242. *** perl-5.6.0.orig/lib/ExtUtils/MM_Unix.pm Thu Mar  2 17:52:52 2000
  243. --- perl-5.6.0/lib/ExtUtils/MM_Unix.pm Sun Sep 17 23:40:15 2000
  244. ***************
  245. *** 2450,2456 ****
  246.   MAP_STATIC    = ",
  247.   join(" \nt", reverse sort keys %static), "
  248.   
  249. ! MAP_PRELIBS   = $Config::Config{libs} $Config::Config{cryptlib}
  250.   ";
  251.   
  252.       if (defined $libperl) {
  253. --- 2450,2456 ----
  254.   MAP_STATIC    = ",
  255.   join(" \nt", reverse sort keys %static), "
  256.   
  257. ! MAP_PRELIBS   = $Config::Config{perllibs} $Config::Config{cryptlib}
  258.   ";
  259.   
  260.       if (defined $libperl) {
  261. diff -cr perl-5.6.0.orig/myconfig.SH perl-5.6.0/myconfig.SH
  262. *** perl-5.6.0.orig/myconfig.SH Sat Feb 26 06:34:49 2000
  263. --- perl-5.6.0/myconfig.SH Sun Sep 17 23:41:17 2000
  264. ***************
  265. *** 48,54 ****
  266.     Linker and Libraries:
  267.       ld='$ld', ldflags ='$ldflags'
  268.       libpth=$libpth
  269. !     libs=$libs
  270.       libc=$libc, so=$so, useshrplib=$useshrplib, libperl=$libperl
  271.     Dynamic Linking:
  272.       dlsrc=$dlsrc, dlext=$dlext, d_dlsymun=$d_dlsymun, ccdlflags='$ccdlflags'
  273. --- 48,54 ----
  274.     Linker and Libraries:
  275.       ld='$ld', ldflags ='$ldflags'
  276.       libpth=$libpth
  277. !     libs=$perllibs
  278.       libc=$libc, so=$so, useshrplib=$useshrplib, libperl=$libperl
  279.     Dynamic Linking:
  280.       dlsrc=$dlsrc, dlext=$dlext, d_dlsymun=$d_dlsymun, ccdlflags='$ccdlflags'
  281. diff -cr perl-5.6.0.orig/patchlevel.h perl-5.6.0/patchlevel.h
  282. *** perl-5.6.0.orig/patchlevel.h Wed Mar 22 20:23:11 2000
  283. --- perl-5.6.0/patchlevel.h Sun Sep 17 23:40:15 2000
  284. ***************
  285. *** 70,75 ****
  286. --- 70,76 ----
  287.   #if !defined(PERL_PATCHLEVEL_H_IMPLICIT) && !defined(LOCAL_PATCH_COUNT)
  288.   static char *local_patches[] = {
  289.    NULL
  290. +  ,"NODB-1.0 - remove -ldb from core perl binary."
  291.    ,NULL
  292.   };
  293.