Integrate changes #8641,8644,8649,8654,8662,8663,8664,8665,8667,8669

from maintperl.

Upgrade to Getopt::Long 2.25, from Johan Vromans.

more files need to be writable in the source distribution

perl_clone() wants to clone PL_numeric_radix_sv (fix for change#8626)

Solaris 2.7 i386 #defines SP in /usr/include/sys/reg.h

Subject: Re: [PATCH perl5.6.1-TRIAL2] long C<=item>s in perlmodlib.pod

Allow the float to be fuzzier.

need to use INT2PTR instead of a straight cast or ia64 fails

Subject: Re: [ID 20010201.006] bad pointer from perlfunc to perlmod 

add ppaddr as one of the compatibility symbols under -DPERL_POLLUTE

p4raw-link: @8662 on //depot/maint-5.6/perl: 4fd7b88664e5220d434e86a4171b6501199a0df5
p4raw-link: @8654 on //depot/maint-5.6/perl: 570327f99599d50e7689d7f8e58ce0062abb9bfd
p4raw-link: @8649 on //depot/maint-5.6/perl: e077e268546d6372b301e6674cc72c8d19727a93
p4raw-link: @8644 on //depot/maint-5.6/perl: 0a4931cb101d4c4c7af706ed2960bc1b4935992e
p4raw-link: @8641 on //depot/maint-5.6/perl: c266a57ee93b609f48ccb9173c2a3073a28cd0db
p4raw-link: @8626 on //depot/maint-5.6/perl: e77a7f40d76565c12d43428402884505d5496c8f

p4raw-id: //depot/perl@8670
p4raw-integrated: from //depot/maint-5.6/perl@8650 'copy in'
	Porting/makerel (@7298..) lib/Getopt/Long.pm (@7895..)
	pod/perlmodlib.PL (@8175..) 'ignore' pod/perlmodlib.pod
	(@8640..) 'merge in' t/lib/peek.t (@8151..) ext/POSIX/POSIX.xs
	(@8177..) embed.pl pp.h (@8620..) embedvar.h (@8626..)
	pod/perlfunc.pod (@8630..)
p4raw-integrated: from //depot/maint-5.6/perl@8649 'merge in' sv.c
	(@8634..)

1 files changed, 12 insertions, 7 deletions

diff --git a/lib/Getopt/Long.pm b/lib/Getopt/Long.pm
index e933c483fd..472527d4a7 100644
--- a/lib/Getopt/Long.pm
+++ b/lib/Getopt/Long.pm
@@ -2,7 +2,7 @@
 
 package Getopt::Long;
 
-# RCS Status      : $Id: GetoptLong.pl,v 2.25 2000-08-28 21:45:17+02 jv Exp jv $
+# RCS Status      : $Id: GetoptLong.pl,v 2.26 2001-01-31 10:20:29+01 jv Exp $
 # Author          : Johan Vromans
 # Created On      : Tue Sep 11 15:00:12 1990
 # Last Modified By: Johan Vromans
@@ -35,8 +35,8 @@ use 5.004;
 use strict;
 
 use vars qw($VERSION $VERSION_STRING);
-$VERSION        =  2.24_02;
-$VERSION_STRING = "2.24_02";
+$VERSION        =  2.25;
+$VERSION_STRING = "2.25";
 
 use Exporter;
 use AutoLoader qw(AUTOLOAD);
@@ -215,7 +215,7 @@ __END__
 
 ################ AutoLoading subroutines ################
 
-# RCS Status      : $Id: GetoptLongAl.pl,v 2.29 2000-08-28 21:56:18+02 jv Exp jv $
+# RCS Status      : $Id: GetoptLongAl.pl,v 2.30 2001-01-31 10:21:11+01 jv Exp $
 # Author          : Johan Vromans
 # Created On      : Fri Mar 27 11:50:30 1998
 # Last Modified By: Johan Vromans
@@ -244,7 +244,7 @@ sub GetOptions {
     print STDERR ("GetOpt::Long $Getopt::Long::VERSION ",
 		  "called from package \"$pkg\".",
 		  "\n  ",
-		  'GetOptionsAl $Revision: 2.29 $ ',
+		  'GetOptionsAl $Revision: 2.30 $ ',
 		  "\n  ",
 		  "ARGV: (@ARGV)",
 		  "\n  ",
@@ -1694,6 +1694,10 @@ is equivalent to
 
     --foo -- arg1 --bar arg2 arg3
 
+If C<pass_through> is also enabled, options processing will terminate
+at the first unrecognized option, or non-option, whichever comes
+first.
+
 =item bundling (default: disabled)
 
 Enabling this option will allow single-character options to be bundled.
@@ -1735,7 +1739,9 @@ errors. This makes it possible to write wrapper scripts that process
 only part of the user supplied command line arguments, and pass the
 remaining options to some other program.
 
-This can be very confusing, especially when C<permute> is also enabled.
+If C<require_order> is enabled, options processing will terminate at
+the first unrecognized option, or non-option, whichever comes first.
+However, if C<permute> is enabled instead, results can become confusing.
 
 =item prefix
 
@@ -1880,6 +1886,5 @@ MA 02139, USA.
 =cut
 
 # Local Variables:
-# mode: perl
 # eval: (load-file "pod.el")
 # End: