home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / perl501m.zip / patches / patch.1e < prev    next >
Text File  |  1995-04-20  |  8KB  |  348 lines
  1. #    Andy Dougherty        doughera@lafcol.lafayette.edu
  2. #
  3. exit 0
  4.  
  5. This is my patch  patch.1e  for perl5.001.
  6.  
  7. To apply, change to your perl directory, run the commands above, then
  8. apply with 
  9.     patch -p1 -N  < thispatch.
  10.  
  11. Here's what's included:
  12.  
  13. Configure
  14.     Change a few more spots so that ' ' is equivalent to "none".
  15.     This allows hint files to set empty values for variables.
  16.  
  17.     Split cpp-symbol awk command for old awk (Harris Night Hawk).
  18.  
  19. hints/irix_5.sh
  20. hints/irix_6.sh
  21.     Explicitly use 'ld' rather than 'cc' to build dynamic modules.
  22.  
  23. hints/linux.sh
  24.     Allow users to specify an alternate compiler on the command line, e.g.
  25.     Configure -Dcc=gcc-elf.
  26.  
  27. lib/ExtUtils/MakeMaker.pm
  28.     Fix CC substitution to allow c++ and variants as well.
  29.     
  30. perl.c
  31.     fputs("Unofficial patchlevel 1e.\n",stdout);
  32.  
  33. pod/Makefile
  34.     Include $(TEX) target for running pod2latex.
  35.     Include some fixes from Bill Middleton.
  36.  
  37.  
  38. Patch and enjoy,
  39.  
  40.     Andy Dougherty            doughera@lafcol.lafayette.edu
  41.     Dept. of Physics
  42.     Lafayette College, Easton PA
  43.  
  44. Index: Configure
  45. Prereq:  3.0.1.7 
  46. *** perl5.001d/Configure    Tue Apr 18 14:09:00 1995
  47. --- perl5.001e/Configure    Mon Apr 17 15:55:59 1995
  48. ***************
  49. *** 20,26 ****
  50.   
  51.   # $Id: Head.U,v 3.0.1.7 1995/03/21 08:46:15 ram Exp $
  52.   #
  53. ! # Generated on Fri Apr 14 15:43:12 EDT 1995 [metaconfig 3.0 PL53]
  54.   
  55.   cat >/tmp/c1$$ <<EOF
  56.   ARGGGHHHH!!!!!
  57. --- 20,26 ----
  58.   
  59.   # $Id: Head.U,v 3.0.1.7 1995/03/21 08:46:15 ram Exp $
  60.   #
  61. ! # Generated on Mon Apr 17 15:46:57 EDT 1995 [metaconfig 3.0 PL53]
  62.   
  63.   cat >/tmp/c1$$ <<EOF
  64.   ARGGGHHHH!!!!!
  65. ***************
  66. *** 4296,4302 ****
  67.   
  68.   EOM
  69.       case "$lddlflags" in
  70. !     ''|' ') case "$osname" in
  71.               hpux)  dflt='-b' ;;
  72.               linux)    dflt='-shared' ;;
  73.               next)  dflt='none' ;;
  74. --- 4296,4302 ----
  75.   
  76.   EOM
  77.       case "$lddlflags" in
  78. !     '') case "$osname" in
  79.               hpux)  dflt='-b' ;;
  80.               linux)    dflt='-shared' ;;
  81.               next)  dflt='none' ;;
  82. ***************
  83. *** 4323,4329 ****
  84.   
  85.   EOM
  86.       case "$ccdlflags" in
  87. !     ''|' ') case "$osname" in
  88.           hpux)    dflt='-Wl,-E' ;;
  89.           linux)    dflt='-rdynamic' ;;
  90.           next)    dflt='none' ;;
  91. --- 4323,4329 ----
  92.   
  93.   EOM
  94.       case "$ccdlflags" in
  95. !     '') case "$osname" in
  96.           hpux)    dflt='-Wl,-E' ;;
  97.           linux)    dflt='-rdynamic' ;;
  98.           next)    dflt='none' ;;
  99. ***************
  100. *** 7392,7398 ****
  101.   chmod +x ccsym
  102.   $eunicefix ccsym
  103.   ./ccsym | $sort | $uniq >ccsym.raw
  104. ! $awk '/\=/ { print $0; next } { print $0"=1" }' ccsym.raw >ccsym.list
  105.   $awk '{ print $0"=1" }' Cppsym.true >ccsym.true
  106.   $comm -13 ccsym.true ccsym.list >ccsym.own
  107.   $comm -12 ccsym.true ccsym.list >ccsym.com
  108. --- 7392,7399 ----
  109.   chmod +x ccsym
  110.   $eunicefix ccsym
  111.   ./ccsym | $sort | $uniq >ccsym.raw
  112. ! $awk '/\=/ { print $0; next }
  113. !     { print $0"=1" }' ccsym.raw >ccsym.list
  114.   $awk '{ print $0"=1" }' Cppsym.true >ccsym.true
  115.   $comm -13 ccsym.true ccsym.list >ccsym.own
  116.   $comm -12 ccsym.true ccsym.list >ccsym.com
  117. Index: hints/irix_5.sh
  118. *** perl5.001d/hints/irix_5.sh    Thu Jan 19 19:07:06 1995
  119. --- perl5.001e/hints/irix_5.sh    Mon Apr 17 09:08:24 1995
  120. ***************
  121. *** 1,4 ****
  122. --- 1,5 ----
  123.   # irix_5.sh
  124. + ld=ld
  125.   i_time='define'
  126.   ccflags="$ccflags -D_POSIX_SOURCE -ansiposix -D_BSD_TYPES -Olimit 3000"
  127.   lddlflags="-shared"
  128. Index: hints/irix_6.sh
  129. *** perl5.001d/hints/irix_6.sh    Thu Jan 19 18:59:12 1995
  130. --- perl5.001e/hints/irix_6.sh    Mon Apr 17 09:09:32 1995
  131. ***************
  132. *** 7,12 ****
  133. --- 7,13 ----
  134.   # Perl built with this hints file under IRIX 6.0.1 passes 
  135.   # all tests (`make test').
  136.   
  137. + ld=ld
  138.   i_time='define'
  139.   cc="cc -32"
  140.   ccflags="$ccflags -D_POSIX_SOURCE -ansiposix -D_BSD_TYPES -Olimit 3000"
  141. Index: hints/linux.sh
  142. *** perl5.001d/hints/linux.sh    Tue Apr 18 14:09:02 1995
  143. --- perl5.001e/hints/linux.sh    Mon Apr 17 12:10:13 1995
  144. ***************
  145. *** 10,15 ****
  146. --- 10,19 ----
  147.   #
  148.   # Last updated Thu Apr  6 12:22:03 EDT 1995
  149.   #
  150. + # If you wish to use something other than 'gcc' for your compiler,
  151. + # you should specify it on the Configure command line.  To use
  152. + # gcc-elf, for exmample, type 
  153. + # ./Configure -Dcc=gcc-elf
  154.   
  155.   # perl goes into the /usr tree.  See the Filesystem Standard
  156.   # available via anonymous FTP at tsx-11.mit.edu in
  157. ***************
  158. *** 64,70 ****
  159.       exit(0); /* succeed (yes, it's ELF) */
  160.   }
  161.   EOM
  162. ! if gcc try.c >/dev/null 2>&1 && ./a.out; then
  163.       cat <<'EOM'
  164.   
  165.   You appear to have ELF support.  I'll try to use it for dynamic loading.
  166. --- 68,74 ----
  167.       exit(0); /* succeed (yes, it's ELF) */
  168.   }
  169.   EOM
  170. ! if ${cc:-gcc} try.c >/dev/null 2>&1 && ./a.out; then
  171.       cat <<'EOM'
  172.   
  173.   You appear to have ELF support.  I'll try to use it for dynamic loading.
  174. Index: lib/ExtUtils/MakeMaker.pm
  175. *** perl5.001d/lib/ExtUtils/MakeMaker.pm    Tue Apr 18 14:09:05 1995
  176. --- perl5.001e/lib/ExtUtils/MakeMaker.pm    Tue Apr 18 09:51:17 1995
  177. ***************
  178. *** 1,6 ****
  179.   package ExtUtils::MakeMaker;
  180.   
  181. ! $Version = 4.093; # Last edited 12 Apr 1995 by Andy Dougherty
  182.   
  183.   use Config;
  184.   use Carp;
  185. --- 1,6 ----
  186.   package ExtUtils::MakeMaker;
  187.   
  188. ! $Version = 4.094; # Last edited 17 Apr 1995 by Andy Dougherty
  189.   
  190.   use Config;
  191.   use Carp;
  192. ***************
  193. *** 1229,1235 ****
  194.       ."Please notify perl5-porters\@nicoh.com\n";
  195.       }
  196.       my($cccmd)=($old) ? $old : $new;
  197. !     $cccmd =~ s/\b\Q$Config{'cc'}\E\b/\$(CC)/;
  198.       "CCCMD = $cccmd\n";
  199.   }
  200.   
  201. --- 1229,1235 ----
  202.       ."Please notify perl5-porters\@nicoh.com\n";
  203.       }
  204.       my($cccmd)=($old) ? $old : $new;
  205. !     $cccmd =~ s/^\s*\Q$Config{'cc'}\E\s/\$(CC) /;
  206.       "CCCMD = $cccmd\n";
  207.   }
  208.   
  209. ***************
  210. *** 2436,2442 ****
  211.   
  212.   Another attempt to fix writedoc() from Dean Roehrich.
  213.   
  214. - 
  215.   v4.092 April 11 1994 by Andreas Koenig
  216.   
  217.   Fixed a docu bug in hint file description. Added printing of a warning
  218. --- 2436,2441 ----
  219. ***************
  220. *** 2469,2475 ****
  221.   Include Tim's suggestions about $verbose and more careful substitution
  222.   of $(CC) for $Config{'cc'}.
  223.   
  224. ! Minor cosmetic fixes for my 80-character wide terminal.
  225.   
  226.   =head1 NOTES
  227.   
  228. --- 2468,2476 ----
  229.   Include Tim's suggestions about $verbose and more careful substitution
  230.   of $(CC) for $Config{'cc'}.
  231.   
  232. ! v4.094 April 12 1994 by Andy Dougherty
  233. ! 
  234. ! Include Andreas' improvement of $(CC) detection.
  235.   
  236.   =head1 NOTES
  237.   
  238. Index: perl.c
  239. *** perl5.001d/perl.c    Tue Apr 18 14:08:43 1995
  240. --- perl5.001e/perl.c    Tue Apr 18 14:06:04 1995
  241. ***************
  242. *** 996,1001 ****
  243. --- 996,1002 ----
  244.       return s;
  245.       case 'v':
  246.       printf("\nThis is perl, version %s\n\n",patchlevel);
  247. +     fputs("\tUnofficial patchlevel 1e.\n",stdout);
  248.       fputs("\nCopyright 1987-1994, Larry Wall\n",stdout);
  249.   #ifdef MSDOS
  250.       fputs("MS-DOS port Copyright (c) 1989, 1990, Diomidis Spinellis\n",
  251. Index: pod/Makefile
  252. *** perl5.001d/pod/Makefile    Tue Apr 18 14:09:06 1995
  253. --- perl5.001e/pod/Makefile    Tue Apr 18 11:39:24 1995
  254. ***************
  255. *** 89,113 ****
  256.       perltrap.html    \
  257.       perlvar.html
  258.   
  259. ! man: $(MAN)
  260.   
  261. ! # pod2html runs on all the pods at once in order to build up
  262.   # cross-references.
  263. ! html:
  264.       $(PERL) pod2html *.pod
  265.   
  266.   .SUFFIXES: .pod .man
  267.   
  268. ! .pod.man:
  269.       $(PERL) pod2man $*.pod >$*.man
  270.   
  271.   .SUFFIXES: .pod .html
  272.   
  273. ! .pod.html:
  274.       $(PERL) pod2html $*.pod
  275.   
  276.   clean:
  277. !     rm -f $(MAN) $(HTML)
  278.   
  279.   realclean:    clean
  280.       rm -f pod2man pod2latex pod2html
  281. --- 89,150 ----
  282.       perltrap.html    \
  283.       perlvar.html
  284.   
  285. ! TEX = \
  286. !     perl.tex    \
  287. !     perlapi.tex    \
  288. !     perlbook.tex    \
  289. !     perlbot.tex    \
  290. !     perlcall.tex    \
  291. !     perldata.tex    \
  292. !     perldebug.tex    \
  293. !     perldiag.tex    \
  294. !     perlembed.tex    \
  295. !     perlform.tex    \
  296. !     perlfunc.tex    \
  297. !     perlguts.tex    \
  298. !     perlipc.tex    \
  299. !     perlmod.tex    \
  300. !     perlobj.tex    \
  301. !     perlop.tex    \
  302. !     perlovl.tex    \
  303. !     perlpod.tex    \
  304. !     perlre.tex    \
  305. !     perlref.tex    \
  306. !     perlrun.tex    \
  307. !     perlsec.tex    \
  308. !     perlstyle.tex    \
  309. !     perlsub.tex    \
  310. !     perlsyn.tex    \
  311. !     perltrap.tex    \
  312. !     perlvar.tex
  313.   
  314. ! 
  315. ! man:  pod2man $(MAN)
  316. ! 
  317. ! # pod2html normally runs on all the pods at once in order to build up
  318.   # cross-references.
  319. ! html: pod2html
  320.       $(PERL) pod2html *.pod
  321.   
  322. + tex:    pod2latex $(TEX)
  323. + 
  324.   .SUFFIXES: .pod .man
  325.   
  326. ! .pod.man:     pod2man
  327.       $(PERL) pod2man $*.pod >$*.man
  328.   
  329.   .SUFFIXES: .pod .html
  330.   
  331. ! .pod.html:    pod2html
  332.       $(PERL) pod2html $*.pod
  333.   
  334. + .SUFFIXES: .pod .tex
  335. + 
  336. + .pod.tex: pod2latex
  337. +     $(PERL) pod2latex $*.pod
  338. + 
  339.   clean:
  340. !     rm -f $(MAN) $(HTML) $(TEX)
  341.   
  342.   realclean:    clean
  343.       rm -f pod2man pod2latex pod2html
  344.  
  345.  
  346. End of patch.
  347.  
  348.