r61088 - in /trunk/libdata-integer-perl: ./ debian/ debian/source/ lib/Data/ t/
angelabad-guest at users.alioth.debian.org
angelabad-guest at users.alioth.debian.org
Mon Aug 2 10:26:37 UTC 2010
Author: angelabad-guest
Date: Mon Aug 2 10:26:24 2010
New Revision: 61088
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=61088
Log:
New upstream release 0.004
Added:
trunk/libdata-integer-perl/debian/source/
trunk/libdata-integer-perl/debian/source/format
Modified:
trunk/libdata-integer-perl/.cvsignore
trunk/libdata-integer-perl/Build.PL
trunk/libdata-integer-perl/Changes
trunk/libdata-integer-perl/META.yml
trunk/libdata-integer-perl/Makefile.PL
trunk/libdata-integer-perl/README
trunk/libdata-integer-perl/SIGNATURE
trunk/libdata-integer-perl/debian/changelog
trunk/libdata-integer-perl/debian/compat
trunk/libdata-integer-perl/debian/control
trunk/libdata-integer-perl/debian/copyright
trunk/libdata-integer-perl/debian/rules
trunk/libdata-integer-perl/lib/Data/Integer.pm
trunk/libdata-integer-perl/t/arith.t
trunk/libdata-integer-perl/t/bitwise.t
trunk/libdata-integer-perl/t/canon.t
trunk/libdata-integer-perl/t/const.t
trunk/libdata-integer-perl/t/fmt.t
trunk/libdata-integer-perl/t/hex.t
trunk/libdata-integer-perl/t/marith.t
trunk/libdata-integer-perl/t/pod_cvg.t
trunk/libdata-integer-perl/t/pod_syn.t
trunk/libdata-integer-perl/t/shift.t
Modified: trunk/libdata-integer-perl/.cvsignore
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdata-integer-perl/.cvsignore?rev=61088&op=diff
==============================================================================
--- trunk/libdata-integer-perl/.cvsignore (original)
+++ trunk/libdata-integer-perl/.cvsignore Mon Aug 2 10:26:24 2010
@@ -1,4 +1,4 @@
Build Makefile
_build blib
-META.yml Makefile.PL SIGNATURE
+META.yml MYMETA.yml Makefile.PL SIGNATURE
Data-Integer-*
Modified: trunk/libdata-integer-perl/Build.PL
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdata-integer-perl/Build.PL?rev=61088&op=diff
==============================================================================
--- trunk/libdata-integer-perl/Build.PL (original)
+++ trunk/libdata-integer-perl/Build.PL Mon Aug 2 10:26:24 2010
@@ -1,29 +1,35 @@
+{ use 5.006; }
use warnings;
use strict;
-no strict "subs";
use Module::Build;
Module::Build->new(
module_name => "Data::Integer",
license => "perl",
+ configure_requires => {
+ "Module::Build" => 0,
+ "perl" => "5.006",
+ "strict" => 0,
+ "warnings" => 0,
+ },
build_requires => {
- Module::Build => 0,
- Test::More => 0,
- integer => 0,
- perl => "5.006",
- strict => 0,
- warnings => 0,
+ "Module::Build" => 0,
+ "Test::More" => 0,
+ "integer" => 0,
+ "perl" => "5.006",
+ "strict" => 0,
+ "warnings" => 0,
},
requires => {
- Carp => 0,
- Exporter => 0,
- base => 0,
- constant => 0,
- integer => 0,
- perl => "5.006",
- strict => 0,
- warnings => 0,
+ "Carp" => 0,
+ "Exporter" => 0,
+ "constant" => 0,
+ "integer" => 0,
+ "parent" => 0,
+ "perl" => "5.006",
+ "strict" => 0,
+ "warnings" => 0,
},
dynamic_config => 0,
meta_add => { distribution_type => "module" },
@@ -31,4 +37,4 @@
sign => 1,
)->create_build_script;
-exit 0;
+1;
Modified: trunk/libdata-integer-perl/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdata-integer-perl/Changes?rev=61088&op=diff
==============================================================================
--- trunk/libdata-integer-perl/Changes (original)
+++ trunk/libdata-integer-perl/Changes Mon Aug 2 10:26:24 2010
@@ -1,3 +1,27 @@
+version 0.004; 2010-07-26
+
+ * in documentation of {s,u}int_msub(), correct description that said
+ "addition" instead of "subtraction"
+
+ * in synopsis, correct number of parameters for {s,u}int_mux()
+
+ * use simpler "parent" pragma in place of "base"
+
+ * in documentation, use the term "truth value" instead of the less
+ precise "boolean"
+
+ * check for required Perl version at runtime
+
+ * use full stricture in test suite
+
+ * use full stricture in Build.PL
+
+ * in Build.PL, explicitly declare configure-time requirements
+
+ * remove bogus "exit 0" from Build.PL
+
+ * add MYMETA.yml to .cvsignore
+
version 0.003; 2007-10-26
* add natint_hex() and hex_natint() functions to output and input
Modified: trunk/libdata-integer-perl/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdata-integer-perl/META.yml?rev=61088&op=diff
==============================================================================
--- trunk/libdata-integer-perl/META.yml (original)
+++ trunk/libdata-integer-perl/META.yml Mon Aug 2 10:26:24 2010
@@ -1,21 +1,7 @@
---
-name: Data-Integer
-version: 0.003
+abstract: 'details of the native integer data type'
author:
- 'Andrew Main (Zefram) <zefram at fysh.org>'
-abstract: details of the native integer data type
-license: perl
-resources:
- license: http://dev.perl.org/licenses/
-requires:
- Carp: 0
- Exporter: 0
- base: 0
- constant: 0
- integer: 0
- perl: 5.006
- strict: 0
- warnings: 0
build_requires:
Module::Build: 0
Test::More: 0
@@ -23,13 +9,32 @@
perl: 5.006
strict: 0
warnings: 0
+configure_requires:
+ Module::Build: 0
+ perl: 5.006
+ strict: 0
+ warnings: 0
+distribution_type: module
dynamic_config: 0
+generated_by: 'Module::Build version 0.3607'
+license: perl
+meta-spec:
+ url: http://module-build.sourceforge.net/META-spec-v1.4.html
+ version: 1.4
+name: Data-Integer
provides:
Data::Integer:
file: lib/Data/Integer.pm
- version: 0.003
-generated_by: Module::Build version 0.2808
-meta-spec:
- url: http://module-build.sourceforge.net/META-spec-v1.2.html
- version: 1.2
-distribution_type: module
+ version: 0.004
+requires:
+ Carp: 0
+ Exporter: 0
+ constant: 0
+ integer: 0
+ parent: 0
+ perl: 5.006
+ strict: 0
+ warnings: 0
+resources:
+ license: http://dev.perl.org/licenses/
+version: 0.004
Modified: trunk/libdata-integer-perl/Makefile.PL
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdata-integer-perl/Makefile.PL?rev=61088&op=diff
==============================================================================
--- trunk/libdata-integer-perl/Makefile.PL (original)
+++ trunk/libdata-integer-perl/Makefile.PL Mon Aug 2 10:26:24 2010
@@ -1,31 +1,35 @@
-# Note: this file was auto-generated by Module::Build::Compat version 0.03
-
+# Note: this file was auto-generated by Module::Build::Compat version 0.3607
+require 5.006;
+
unless (eval "use Module::Build::Compat 0.02; 1" ) {
print "This module requires Module::Build to install itself.\n";
-
+
require ExtUtils::MakeMaker;
my $yn = ExtUtils::MakeMaker::prompt
(' Install Module::Build now from CPAN?', 'y');
-
+
unless ($yn =~ /^y/i) {
die " *** Cannot install without Module::Build. Exiting ...\n";
}
-
+
require Cwd;
require File::Spec;
require CPAN;
-
+
# Save this 'cause CPAN will chdir all over the place.
my $cwd = Cwd::cwd();
-
+
CPAN::Shell->install('Module::Build::Compat');
CPAN::Shell->expand("Module", "Module::Build::Compat")->uptodate
or die "Couldn't install Module::Build, giving up.\n";
-
+
chdir $cwd or die "Cannot chdir() back to $cwd: $!";
}
eval "use Module::Build::Compat 0.02; 1" or die $@;
Module::Build::Compat->run_build_pl(args => \@ARGV);
+ my $build_script = 'Build';
+ $build_script .= '.com' if $^O eq 'VMS';
+ exit(0) unless(-e $build_script); # cpantesters convention
require Module::Build;
Module::Build::Compat->write_makefile(build_class => 'Module::Build');
Modified: trunk/libdata-integer-perl/README
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdata-integer-perl/README?rev=61088&op=diff
==============================================================================
--- trunk/libdata-integer-perl/README (original)
+++ trunk/libdata-integer-perl/README Mon Aug 2 10:26:24 2010
@@ -25,7 +25,7 @@
COPYRIGHT
-Copyright (C) 2007 Andrew Main (Zefram) <zefram at fysh.org>
+Copyright (C) 2007, 2010 Andrew Main (Zefram) <zefram at fysh.org>
LICENSE
Modified: trunk/libdata-integer-perl/SIGNATURE
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdata-integer-perl/SIGNATURE?rev=61088&op=diff
==============================================================================
--- trunk/libdata-integer-perl/SIGNATURE (original)
+++ trunk/libdata-integer-perl/SIGNATURE Mon Aug 2 10:26:24 2010
@@ -1,5 +1,5 @@
This file contains message digests of all files listed in MANIFEST,
-signed via the Module::Signature module, version 0.55.
+signed via the Module::Signature module, version 0.64.
To verify the content in this distribution, first make sure you have
Module::Signature installed, then type:
@@ -14,28 +14,28 @@
-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA1
-SHA1 8aeb57c923d72c343045f6fa2559f7bc9aeceee7 .cvsignore
-SHA1 bfaf543950e709954c275f9c7dbd815b86e3c0b7 Build.PL
-SHA1 8721690b3f542d442805d2b06d8c03d70a8c4ce2 Changes
+SHA1 ba49ef40300a13f7460b40389d8b409a2322a1f9 .cvsignore
+SHA1 89ff4f6bd8cc3dce68bb468d84ed80b42a850415 Build.PL
+SHA1 05703b0c95013353117b85a006e3b6bccbee1406 Changes
SHA1 973611a3dd36b64c268d1bb434068bf77aebe41d MANIFEST
-SHA1 c2c4c390bf45e0190baa0e583314e40be06153b8 META.yml
-SHA1 cd14ada78fb37a0d926edd86eddcdf7f939de582 Makefile.PL
-SHA1 1971244c94a6c3e84af8fc25e165f4a469f1de73 README
-SHA1 742f4ac11dd952b66b60930ff2ae4c5d37a068eb lib/Data/Integer.pm
-SHA1 7da3f6136cf1a951c0061cf8529f595c4a012f63 t/arith.t
-SHA1 fc4a64e59cbf3c8473c78590786ebfec1000f263 t/bitwise.t
-SHA1 91816e78bd239ee7482f91232c6dda81d16fe8d7 t/canon.t
-SHA1 45806807e84a241b7892073ccf8c62fd8ba661bd t/const.t
-SHA1 0dc3c05b8e8a4a124bcd990389bc02f24559546f t/fmt.t
-SHA1 f4db2e3cc147e91ee0c4498d483d5de86ca80d6d t/hex.t
-SHA1 564c04d2b28b646290da5b132afdfeaaa47ff7cd t/marith.t
-SHA1 0e141eecf3ca4903ef38d9413b5403a9ddb0392f t/pod_cvg.t
-SHA1 74a957cd8b93f25672ecc6aa578a671d084dd343 t/pod_syn.t
-SHA1 fe46e1d2059dbc592eace4ccda9951e921e7abbe t/shift.t
+SHA1 a0883f66969a2aef5a45b0f641f9faee3f45e8d0 META.yml
+SHA1 caae608231ffe78390c76451ade51a7cfc87a9f9 Makefile.PL
+SHA1 ed8fbe8d2149a0497b601886e2f4133a352eb4e9 README
+SHA1 0234b643352a56d8304182b1fea80fe26c404599 lib/Data/Integer.pm
+SHA1 a6775c8babaa5a71ec2762cffb276ee7530a449f t/arith.t
+SHA1 a4c627f299ef3fb42c8ab1b2151d667c7c4a0b69 t/bitwise.t
+SHA1 1c725e7123c27fd68fd93512a273a246234affd3 t/canon.t
+SHA1 3de2723a7593d5e49a3c0e87d7b29c5a694c6a10 t/const.t
+SHA1 d784710a9ccd68988b460781fe738173c1f4cf5f t/fmt.t
+SHA1 763505f6c82a121f8fb51f6e97a9d91325242e96 t/hex.t
+SHA1 000292602149b3a4395b102c949515abb80baafd t/marith.t
+SHA1 904d9a4f76525e2303e4b0c168c68230f223c8de t/pod_cvg.t
+SHA1 65c75abdef6f01a5d1588a307f2ddfe2333dc961 t/pod_syn.t
+SHA1 109d93a082fe01366dea95f4c099b7d04fb775b3 t/shift.t
-----BEGIN PGP SIGNATURE-----
-Version: GnuPG v1.4.6 (GNU/Linux)
+Version: GnuPG v1.4.9 (GNU/Linux)
-iD8DBQFHIlgKOV9mt2VyAVERAj/hAJ47X2jNlRAyNExYS5kDMctg8vSozQCfddyE
-KpK+frchbMjeYwHYuZx4JCY=
-=rpyK
+iEYEARECAAYFAkxN7L0ACgkQOV9mt2VyAVH2hQCeO/7WSkGV0fGGIi3f6OMHsLnU
+07YAoJlZU5LMv1tF2pfdWinlNF5krsSi
+=VyTP
-----END PGP SIGNATURE-----
Modified: trunk/libdata-integer-perl/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdata-integer-perl/debian/changelog?rev=61088&op=diff
==============================================================================
--- trunk/libdata-integer-perl/debian/changelog (original)
+++ trunk/libdata-integer-perl/debian/changelog Mon Aug 2 10:26:24 2010
@@ -1,17 +1,28 @@
-libdata-integer-perl (0.003-2) UNRELEASED; urgency=low
+libdata-integer-perl (0.004-1) unstable; urgency=low
+
+ [ Angel Abad ]
+ * New upstream release
+ * Add myself to uploaders
+ * debian/control:
+ - Remove libmodule-build-perl from Build-Depends-Indep
+ - Add perl (>= 5.10.1) | libparent-perl in Build-Depends-Indep
+ - Add perl (>= 5.10.1) | libparent-perl in Depends
+ - Mention module name in long description.
+ * debian/rules: Move to mimalistic dh7 style
+ * Update copyright file
+ * Standards-Version 3.9.1
+ * Switch to dpkg-source format 3.0 (quilt)
[ gregor herrmann ]
* debian/watch: use dist-based URL.
* debian/control: Changed: Switched Vcs-Browser field to ViewSVN
(source stanza).
+ * Change my email address.
[ Nathan Handler ]
* debian/watch: Update to ignore development releases.
- [ gregor herrmann ]
- * Change my email address.
-
- -- gregor herrmann <gregoa at debian.org> Wed, 06 Aug 2008 18:23:22 -0300
+ -- Angel Abad <angelabad at gmail.com> Mon, 02 Aug 2010 12:25:19 +0200
libdata-integer-perl (0.003-1) unstable; urgency=low
Modified: trunk/libdata-integer-perl/debian/compat
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdata-integer-perl/debian/compat?rev=61088&op=diff
==============================================================================
--- trunk/libdata-integer-perl/debian/compat (original)
+++ trunk/libdata-integer-perl/debian/compat Mon Aug 2 10:26:24 2010
@@ -1,1 +1,1 @@
-5
+7
Modified: trunk/libdata-integer-perl/debian/control
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdata-integer-perl/debian/control?rev=61088&op=diff
==============================================================================
--- trunk/libdata-integer-perl/debian/control (original)
+++ trunk/libdata-integer-perl/debian/control Mon Aug 2 10:26:24 2010
@@ -1,22 +1,22 @@
Source: libdata-integer-perl
Section: perl
Priority: optional
-Build-Depends: debhelper (>= 5.0.0)
-Build-Depends-Indep: perl (>= 5.8.8-7), libmodule-build-perl, libtest-pod-perl,
- libtest-pod-coverage-perl
+Build-Depends: debhelper (>= 7.0.17)
+Build-Depends-Indep: perl, libtest-pod-coverage-perl, libtest-pod-perl,
+ perl (>= 5.10.1) | libparent-perl
Maintainer: Debian Perl Group <pkg-perl-maintainers at lists.alioth.debian.org>
-Uploaders: gregor herrmann <gregoa at debian.org>,
- Damyan Ivanov <dmn at debian.org>
-Standards-Version: 3.7.2
+Uploaders: gregor herrmann <gregoa at debian.org>, Damyan Ivanov <dmn at debian.org>,
+ Angel Abad <angelabad at gmail.com>
+Standards-Version: 3.9.1
+Homepage: http://search.cpan.org/dist/Data-Integer/
Vcs-Svn: svn://svn.debian.org/pkg-perl/trunk/libdata-integer-perl/
Vcs-Browser: http://svn.debian.org/viewsvn/pkg-perl/trunk/libdata-integer-perl/
-Homepage: http://search.cpan.org/dist/Data-Integer/
Package: libdata-integer-perl
Architecture: all
-Depends: ${perl:Depends}, ${misc:Depends},
+Depends: ${misc:Depends}, ${perl:Depends}, perl (>= 5.10.1) | libparent-perl
Description: Perl modules handling details of the native integer data type
- This module is about the native integer numerical data type. A native
+ Data::Integer is about the native integer numerical data type. A native
integer is one of the types of datum that can appear in the numeric part
of a Perl scalar. This module supplies constants describing the native
integer type.
Modified: trunk/libdata-integer-perl/debian/copyright
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdata-integer-perl/debian/copyright?rev=61088&op=diff
==============================================================================
--- trunk/libdata-integer-perl/debian/copyright (original)
+++ trunk/libdata-integer-perl/debian/copyright Mon Aug 2 10:26:24 2010
@@ -1,23 +1,31 @@
-This is the debian package for the Data-Integer module.
-It was created by gregor herrmann <gregoa at debian.org> using
-dh-make-perl and is maintained by the Debian Perl Group.
+Format-Specification: http://svn.debian.org/wsvn/dep/web/deps/dep5.mdwn?op=file&rev=135
+Maintainer: Andrew Main (Zefram) <zefram at fysh.org>
+Source: http://search.cpan.org/dist/Data-Integer/
+Name: Data-Integer
-It was downloaded from http://search.cpan.org/dist/Data-Integer/
+Files: *
+Copyright: 2007-2010, Andrew Main (Zefram) <zefram at fysh.org>
+License: Artistic or GPL-1+
-The upstream author is:
-Andrew Main (Zefram) <zefram at fysh.org>
+Files: debian/*
+Copyright: 2007, Damyan Ivanov <dmn at debian.org>
+ 2007, gregor herrmann <gregor+debian at comodo.priv.at>
+ 2008, gregor herrmann <gregoa at debian.org>
+ 2010, Angel Abad <angelabad at gmail.com>
+License: Artistic or GPL-1+
-Copyright (C) 2007 Andrew Main (Zefram) <zefram at fysh.org>
+License: Artistic
+ This program is free software; you can redistribute it and/or modify
+ it under the terms of the Artistic License, which comes with Perl.
+ .
+ On Debian GNU/Linux systems, the complete text of the Artistic License
+ can be found in `/usr/share/common-licenses/Artistic'.
-This module is free software; you can redistribute it and/or modify it
-under the same terms as Perl itself.
-
-Perl is distributed under your choice of the GNU General Public License or
-the Artistic License. On Debian GNU/Linux systems, the complete text of the
-GNU General Public License can be found in `/usr/share/common-licenses/GPL'
-and the Artistic Licence in `/usr/share/common-licenses/Artistic'.
-
-
-The Debian packaging is (C) 2007, gregor herrmann
-<gregoa at debian.org> and is licensed under the same terms as the
-software itself (see above).
+License: GPL-1+
+ This program is free software; you can redistribute it and/or modify
+ it under the terms of the GNU General Public License as published by
+ the Free Software Foundation; either version 1, or (at your option)
+ any later version.
+ .
+ On Debian GNU/Linux systems, the complete text of version 1 of the
+ General Public License can be found in `/usr/share/common-licenses/GPL-1'.
Modified: trunk/libdata-integer-perl/debian/rules
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdata-integer-perl/debian/rules?rev=61088&op=diff
==============================================================================
--- trunk/libdata-integer-perl/debian/rules (original)
+++ trunk/libdata-integer-perl/debian/rules Mon Aug 2 10:26:24 2010
@@ -1,66 +1,4 @@
#!/usr/bin/make -f
-# This debian/rules file is provided as a template for normal perl
-# packages. It was created by Marc Brockschmidt <marc at dch-faq.de> for
-# the Debian Perl Group (http://pkg-perl.alioth.debian.org/) but may
-# be used freely wherever it is useful.
-# Uncomment this to turn on verbose mode.
-#export DH_VERBOSE=1
-
-# If set to a true value then MakeMaker's prompt function will
-# always return the default without waiting for user input.
-export PERL_MM_USE_DEFAULT=1
-
-PACKAGE=$(shell dh_listpackages)
-
-ifndef PERL
-PERL = /usr/bin/perl
-endif
-
-TMP =$(CURDIR)/debian/$(PACKAGE)
-
-build: build-stamp
-build-stamp:
- dh_testdir
- $(PERL) Build.PL installdirs=vendor create_packlist=0
- $(PERL) Build
- $(PERL) Build test
-
- touch $@
-
-clean:
- dh_testdir
- dh_testroot
- dh_clean build-stamp install-stamp
- [ ! -f Build ] || $(MPERL) Build distclean
-
-install: build install-stamp
-install-stamp:
- dh_testdir
- dh_testroot
- dh_clean -k
- $(PERL) Build install destdir=$(TMP)
-
- touch $@
-
-binary-arch:
-# We have nothing to do by default.
-
-binary-indep: build install
- dh_testdir
- dh_testroot
- dh_installdocs README
- dh_installchangelogs Changes
- dh_perl
- dh_compress
- dh_fixperms
- dh_installdeb
- dh_gencontrol
- dh_md5sums
- dh_builddeb
-
-source diff:
- @echo >&2 'source and diff are obsolete - use dpkg-source -b'; false
-
-binary: binary-indep binary-arch
-.PHONY: build clean binary-indep binary-arch binary
+%:
+ dh $@
Added: trunk/libdata-integer-perl/debian/source/format
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdata-integer-perl/debian/source/format?rev=61088&op=file
==============================================================================
--- trunk/libdata-integer-perl/debian/source/format (added)
+++ trunk/libdata-integer-perl/debian/source/format Mon Aug 2 10:26:24 2010
@@ -1,0 +1,1 @@
+3.0 (quilt)
Modified: trunk/libdata-integer-perl/lib/Data/Integer.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdata-integer-perl/lib/Data/Integer.pm?rev=61088&op=diff
==============================================================================
--- trunk/libdata-integer-perl/lib/Data/Integer.pm (original)
+++ trunk/libdata-integer-perl/lib/Data/Integer.pm Mon Aug 2 10:26:24 2010
@@ -111,8 +111,8 @@
$ui = uint_xor($ua, $ub);
$si = sint_nxor($sa, $sb);
$ui = uint_nxor($ua, $ub);
- $si = sint_mux($sa, $sb);
- $ui = uint_mux($ua, $ub);
+ $si = sint_mux($sa, $sb, $sc);
+ $ui = uint_mux($ua, $ub, $uc);
use Data::Integer qw(
sint_madd uint_madd
@@ -179,14 +179,15 @@
package Data::Integer;
+{ use 5.006; }
use warnings;
use strict;
use Carp qw(croak);
-our $VERSION = "0.003";
-
-use base "Exporter";
+our $VERSION = "0.004";
+
+use parent "Exporter";
our @EXPORT_OK = qw(
natint_bits
min_nint max_nint min_natint max_natint
@@ -410,7 +411,7 @@
=item nint_is_sint(A)
-Takes a native integer of either type. Returns a Boolean indicating
+Takes a native integer of either type. Returns a truth value indicating
whether this value can be exactly represented as a signed native integer.
=cut
@@ -423,7 +424,7 @@
=item nint_is_uint(A)
-Takes a native integer of either type. Returns a Boolean indicating
+Takes a native integer of either type. Returns a truth value indicating
whether this value can be exactly represented as an unsigned native
integer.
@@ -1134,7 +1135,7 @@
=item uint_msub(A, B)
-Modular addition. The result for unsigned addition is (A - B)
+Modular subtraction. The result for unsigned subtraction is (A - B)
mod 2^natint_bits. The signed version behaves similarly, but with a
different result range.
@@ -1406,7 +1407,7 @@
=head1 COPYRIGHT
-Copyright (C) 2007 Andrew Main (Zefram) <zefram at fysh.org>
+Copyright (C) 2007, 2010 Andrew Main (Zefram) <zefram at fysh.org>
=head1 LICENSE
Modified: trunk/libdata-integer-perl/t/arith.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdata-integer-perl/t/arith.t?rev=61088&op=diff
==============================================================================
--- trunk/libdata-integer-perl/t/arith.t (original)
+++ trunk/libdata-integer-perl/t/arith.t Mon Aug 2 10:26:24 2010
@@ -1,3 +1,6 @@
+use warnings;
+use strict;
+
use Test::More tests => 1 + 3*14*14 + 3*11*11 + 3*9*9 + 108 + 1749;
BEGIN { use_ok "Data::Integer", qw(
@@ -390,3 +393,5 @@
}
}
}
+
+1;
Modified: trunk/libdata-integer-perl/t/bitwise.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdata-integer-perl/t/bitwise.t?rev=61088&op=diff
==============================================================================
--- trunk/libdata-integer-perl/t/bitwise.t (original)
+++ trunk/libdata-integer-perl/t/bitwise.t Mon Aug 2 10:26:24 2010
@@ -1,3 +1,6 @@
+use warnings;
+use strict;
+
use Test::More tests => 1 + 4*4 + (4*8 + 4*8 + 2*8)*2 + 4*8 + 4*8 + 4*5;
BEGIN { use_ok "Data::Integer", qw(
@@ -182,3 +185,5 @@
nint_is sint_mux($sa, $sb, $sc), $sr;
nint_is sint_mux(do { use integer; ~$sa }, $sc, $sb), $sr;
}
+
+1;
Modified: trunk/libdata-integer-perl/t/canon.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdata-integer-perl/t/canon.t?rev=61088&op=diff
==============================================================================
--- trunk/libdata-integer-perl/t/canon.t (original)
+++ trunk/libdata-integer-perl/t/canon.t Mon Aug 2 10:26:24 2010
@@ -1,3 +1,6 @@
+use warnings;
+use strict;
+
use Test::More tests => 1 + 5*16 + 3*3;
BEGIN { use_ok "Data::Integer", qw(
@@ -53,3 +56,5 @@
eval { sint($_) }; like $@, qr/\Anot a signed native integer/;
eval { uint($_) }; like $@, qr/\Anot an unsigned native integer/;
}
+
+1;
Modified: trunk/libdata-integer-perl/t/const.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdata-integer-perl/t/const.t?rev=61088&op=diff
==============================================================================
--- trunk/libdata-integer-perl/t/const.t (original)
+++ trunk/libdata-integer-perl/t/const.t Mon Aug 2 10:26:24 2010
@@ -1,3 +1,6 @@
+use warnings;
+use strict;
+
use Test::More tests => 18;
BEGIN { use_ok "Data::Integer", qw(
@@ -47,3 +50,5 @@
nint_is max_unsigned_natint, $max_uint;
nint_is max_nint, $max_uint;
nint_is max_natint, $max_uint;
+
+1;
Modified: trunk/libdata-integer-perl/t/fmt.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdata-integer-perl/t/fmt.t?rev=61088&op=diff
==============================================================================
--- trunk/libdata-integer-perl/t/fmt.t (original)
+++ trunk/libdata-integer-perl/t/fmt.t Mon Aug 2 10:26:24 2010
@@ -1,3 +1,6 @@
+use warnings;
+use strict;
+
use Test::More tests => 1 + 4*5 + 6*4;
BEGIN { use_ok "Data::Integer", qw(
@@ -36,3 +39,5 @@
nint_is sint_bits_as_uint($si), $ui;
nint_is uint_bits_as_sint($ui), $si;
}
+
+1;
Modified: trunk/libdata-integer-perl/t/hex.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdata-integer-perl/t/hex.t?rev=61088&op=diff
==============================================================================
--- trunk/libdata-integer-perl/t/hex.t (original)
+++ trunk/libdata-integer-perl/t/hex.t Mon Aug 2 10:26:24 2010
@@ -1,3 +1,6 @@
+use warnings;
+use strict;
+
use Test::More tests => 116;
BEGIN { use_ok "Data::Integer", qw(natint_hex hex_natint natint_bits); }
@@ -111,3 +114,5 @@
eval { hex_natint("-".$over_digit.("0" x $tail_digits)) };
like $@, qr/\Ainteger value too large/;
}
+
+1;
Modified: trunk/libdata-integer-perl/t/marith.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdata-integer-perl/t/marith.t?rev=61088&op=diff
==============================================================================
--- trunk/libdata-integer-perl/t/marith.t (original)
+++ trunk/libdata-integer-perl/t/marith.t Mon Aug 2 10:26:24 2010
@@ -1,3 +1,6 @@
+use warnings;
+use strict;
+
use Test::More tests => 1 + 8*86 + 8*98 + 8*86 + 2*49 + 2*43 + 1*92 + 1*89;
BEGIN { use_ok "Data::Integer", qw(
@@ -633,3 +636,5 @@
my($a, $b, $c) = @$_;
nint_is uint_ssub($a, $b), $c;
}
+
+1;
Modified: trunk/libdata-integer-perl/t/pod_cvg.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdata-integer-perl/t/pod_cvg.t?rev=61088&op=diff
==============================================================================
--- trunk/libdata-integer-perl/t/pod_cvg.t (original)
+++ trunk/libdata-integer-perl/t/pod_cvg.t Mon Aug 2 10:26:24 2010
@@ -1,4 +1,9 @@
+use warnings;
+use strict;
+
use Test::More;
plan skip_all => "Test::Pod::Coverage not available"
unless eval "use Test::Pod::Coverage; 1";
Test::Pod::Coverage::all_pod_coverage_ok();
+
+1;
Modified: trunk/libdata-integer-perl/t/pod_syn.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdata-integer-perl/t/pod_syn.t?rev=61088&op=diff
==============================================================================
--- trunk/libdata-integer-perl/t/pod_syn.t (original)
+++ trunk/libdata-integer-perl/t/pod_syn.t Mon Aug 2 10:26:24 2010
@@ -1,3 +1,8 @@
+use warnings;
+use strict;
+
use Test::More;
plan skip_all => "Test::Pod not available" unless eval "use Test::Pod 1.00; 1";
Test::Pod::all_pod_files_ok();
+
+1;
Modified: trunk/libdata-integer-perl/t/shift.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdata-integer-perl/t/shift.t?rev=61088&op=diff
==============================================================================
--- trunk/libdata-integer-perl/t/shift.t (original)
+++ trunk/libdata-integer-perl/t/shift.t Mon Aug 2 10:26:24 2010
@@ -1,3 +1,6 @@
+use warnings;
+use strict;
+
use Test::More tests => 1 + 2*21 + 1*17 + 1*17 + 4*21;
BEGIN { use_ok "Data::Integer", qw(
@@ -126,3 +129,5 @@
nint_is sint_rol($sa, $ldist), $sr;
nint_is sint_ror($sa, $rdist), $sr;
}
+
+1;
More information about the Pkg-perl-cvs-commits
mailing list