* demos/perl/GMP.pm, Makefile.PL (VERSION): Set to '2.00'.

	* demos/perl/GMP.pm (COPYRIGHT): New in the doc section.

And quietly remove the reference to mpfr, which is not going to get
anything done about it in the forseeable future.

1 files changed, 29 insertions, 6 deletions

diff --git a/demos/perl/GMP.pm b/demos/perl/GMP.pm
index 6fc062541..052ae48a6 100644
--- a/demos/perl/GMP.pm
+++ b/demos/perl/GMP.pm
@@ -1,6 +1,6 @@
 # GMP perl module
 
-# Copyright 2001, 2002, 2003 Free Software Foundation, Inc.
+# Copyright 2001, 2002, 2003, 2004 Free Software Foundation, Inc.
 #
 # This file is part of the GNU MP Library.
 #
@@ -19,6 +19,10 @@
 # the Free Software Foundation, Inc., 59 Temple Place - Suite 330, Boston,
 # MA 02111-1307, USA.
 
+# [Note: The above copyright notice is repeated in the documentation section
+# below, in order to get it into man pages etc generated by the various pod
+# conversions.  When changing, be sure to update below too.]
+
 
 # This code is designed to work with perl 5.005, so it and the sub-packages
 # aren't as modern as they could be.
@@ -38,7 +42,7 @@ require DynaLoader;
 		'constants' => [()]);
 Exporter::export_ok_tags('all');
 
-$VERSION = '1';
+$VERSION = '2.00';
 bootstrap GMP $VERSION;
 
 
@@ -203,8 +207,8 @@ Their parameters are as follows,
 
 The order, size, endian and nails parameters are as per the corresponding C
 functions.  The string input for C<mpz_import> is interpreted as byte data
-and must be a multiple of size bytes.  C<mpz_export> conversely returns a
-string of byte data, which will be a multiple of size bytes.
+and must be a multiple of $size bytes.  C<mpz_export> conversely returns a
+string of byte data, which will be a multiple of $size bytes.
 
 C<invert> returns the inverse, or undef if it doesn't exist.  C<remove>
 returns a remainder/multiplicty pair.  C<root> returns the nth root, and
@@ -595,8 +599,6 @@ will do, but on a plain scalar its action depends on whether the scalar was
 promoted to a float at any stage, and then on the GMP module rules about
 using the integer or float part.
 
-There's no interface to mpfr.
-
 =head1 INTERNALS
 
 In usual perl object style, an mpz is a reference to an object blessed into
@@ -622,6 +624,27 @@ directly.
 
 Some assertion checking is available as a compile-time option.
 
+=head1 COPYRIGHT
+
+Copyright 2001, 2002, 2003, 2004 Free Software Foundation, Inc.
+
+This file is part of the GNU MP Library.
+
+The GNU MP Library is free software; you can redistribute it and/or modify
+it under the terms of the GNU Lesser General Public License as published
+by the Free Software Foundation; either version 2.1 of the License, or (at
+your option) any later version.
+
+The GNU MP Library is distributed in the hope that it will be useful, but
+WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
+or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU Lesser General Public
+License for more details.
+
+You should have received a copy of the GNU Lesser General Public License
+along with the GNU MP Library; see the file COPYING.LIB.  If not, write to
+the Free Software Foundation, Inc., 59 Temple Place - Suite 330, Boston,
+MA 02111-1307, USA.
+
 =cut
 
 # Local variables: