[libmath-mpfr-perl] 06/08: debian/patches/spelling-errors: Fix spelling errors.
Angel Abad
angel at debian.org
Sat Oct 29 09:59:38 UTC 2016
This is an automated email from the git hooks/post-receive script.
angel pushed a commit to branch master
in repository libmath-mpfr-perl.
commit 19ab1c96b2f93f5520166c695f0aca042d423d81
Author: Angel Abad <angelabad at gmail.com>
Date: Sat Oct 29 11:53:24 2016 +0200
debian/patches/spelling-errors: Fix spelling errors.
---
debian/patches/series | 1 +
debian/patches/spelling-errors | 129 +++++++++++++++++++++++++++++++++++++++++
2 files changed, 130 insertions(+)
diff --git a/debian/patches/series b/debian/patches/series
new file mode 100644
index 0000000..2b7dda4
--- /dev/null
+++ b/debian/patches/series
@@ -0,0 +1 @@
+spelling-errors
diff --git a/debian/patches/spelling-errors b/debian/patches/spelling-errors
new file mode 100644
index 0000000..330fcdd
--- /dev/null
+++ b/debian/patches/spelling-errors
@@ -0,0 +1,129 @@
+Description: Fix spelling errors
+Author: Angel Abad <angel at debian.org>
+Forwarded: yes
+Bug: https://rt.cpan.org/Public/Bug/Display.html?id=118537
+Last-Updated: 2016-10-29
+
+--- a/MPFR.xs
++++ b/MPFR.xs
+@@ -5836,7 +5836,7 @@
+ croak("2nd arg to Math::MPFR::_d_bytes_fr must be 53");
+
+ if(mpfr_get_prec(*str) != 53)
+- croak("Precison of 1st arg supplied to _d_bytes_fr must be 53, not %u", mpfr_get_prec(*str));
++ croak("Precision of 1st arg supplied to _d_bytes_fr must be 53, not %u", mpfr_get_prec(*str));
+
+ if((size_t)bits != DBL_MANT_DIG)
+ croak("2nd arg (%u) supplied to Math::MPFR::_d_bytes_fr does not match DBL_MANT_DIG (%u)", bits, DBL_MANT_DIG);
+@@ -5937,7 +5937,7 @@
+ croak("2nd arg to Math::MPFR::_dd_bytes must be 106");
+
+ if(mpfr_get_prec(*str) != 2098)
+- croak("Precison of 1st arg supplied to _dd_bytes_fr must be 2098, not %u", mpfr_get_prec(*str));
++ croak("Precision of 1st arg supplied to _dd_bytes_fr must be 2098, not %u", mpfr_get_prec(*str));
+
+ mpfr_init2(temp, 2098);
+
+@@ -6049,7 +6049,7 @@
+ }
+
+ if(mpfr_get_prec(*str) != bits)
+- croak("Precison of 1st arg (%u) supplied to _ld_bytes_fr must match 2nd arg (%d)", mpfr_get_prec(*str), bits);
++ croak("Precision of 1st arg (%u) supplied to _ld_bytes_fr must match 2nd arg (%d)", mpfr_get_prec(*str), bits);
+
+ if((size_t)bits != LDBL_MANT_DIG)
+ croak("2nd arg (%u) supplied to Math::MPFR::_ld_bytes_fr does not match LDBL_MANT_DIG (%u)", bits, LDBL_MANT_DIG);
+@@ -6155,7 +6155,7 @@
+ croak("2nd arg to Math::MPFR::_f128_bytes_fr must be 113");
+
+ if(mpfr_get_prec(*str) != 113)
+- croak("Precison of 1st arg supplied to _f128_bytes_fr must be 113, not %u", mpfr_get_prec(*str));
++ croak("Precision of 1st arg supplied to _f128_bytes_fr must be 113, not %u", mpfr_get_prec(*str));
+
+ if((size_t)bits != FLT128_MANT_DIG)
+ croak("2nd arg (%u) supplied to Math::MPFR::_f128_bytes_fr does not match FLT128_MANT_DIG (%u)", bits, FLT128_MANT_DIG);
+--- a/t/bytes.t
++++ b/t/bytes.t
+@@ -277,7 +277,7 @@
+
+ eval {Math::MPFR::_d_bytes_fr($fr_breaker, 53);};
+
+-if($@ =~ /^Precison of 1st arg supplied to _d_bytes_fr must be 53, not 200/) {print "ok 14\n"}
++if($@ =~ /^Precision of 1st arg supplied to _d_bytes_fr must be 53, not 200/) {print "ok 14\n"}
+ else {
+ warn "\$\@: $@\n";
+ print "not ok 14\n";
+@@ -285,7 +285,7 @@
+
+ eval {Math::MPFR::_dd_bytes_fr($fr_breaker, 106);};
+
+-if($@ =~ /^Precison of 1st arg supplied to _dd_bytes_fr must be 2098, not 200/) {print "ok 15\n"}
++if($@ =~ /^Precision of 1st arg supplied to _dd_bytes_fr must be 2098, not 200/) {print "ok 15\n"}
+ else {
+ warn "\$\@: $@\n";
+ print "not ok 15\n";
+@@ -294,7 +294,7 @@
+ eval {Math::MPFR::_ld_bytes_fr($fr_breaker, 64);};
+
+
+-if($@ =~ /^Precison of 1st arg \(200\) supplied to _ld_bytes_fr must match 2nd arg \(64\)/) {print "ok 16\n"}
++if($@ =~ /^Precision of 1st arg \(200\) supplied to _ld_bytes_fr must match 2nd arg \(64\)/) {print "ok 16\n"}
+ else {
+ warn "\$\@: $@\n";
+ print "not ok 16\n";
+@@ -302,7 +302,7 @@
+
+ eval {Math::MPFR::_f128_bytes_fr($fr_breaker, 113);};
+
+-if($@ =~ /^Precison of 1st arg supplied to _f128_bytes_fr must be 113, not 200/ ||
++if($@ =~ /^Precision of 1st arg supplied to _f128_bytes_fr must be 113, not 200/ ||
+ $@ =~ /^__float128 support not built into this Math::MPFR/) {print "ok 17\n"}
+ else {
+ warn "\$\@: $@\n";
+@@ -377,7 +377,7 @@
+
+ eval{$h = Math::MPFR::bytes($d_fr, 'Long Double');};
+
+-if($@ =~ /^Precison of 1st arg \(53\) supplied to _ld_bytes_fr must match 2nd arg \(64\)/) {print "ok 22\n"}
++if($@ =~ /^Precision of 1st arg \(53\) supplied to _ld_bytes_fr must match 2nd arg \(64\)/) {print "ok 22\n"}
+ else {
+ warn "\$\@: $@";
+ print "not ok 22\n";
+--- a/MPFR.pm
++++ b/MPFR.pm
+@@ -1094,7 +1094,7 @@
+ the entire string is a valid number in base $base. otherwise
+ it returns -1.
+ If -1 is returned:
+- 1) the non-numeric flag (which was initalised to 0) will be
++ 1) the non-numeric flag (which was initialised to 0) will be
+ incremented. You can query/clear/reset the value of the
+ flag with (resp.) nnumflag()/clear_nnum()/set_nnum() - all
+ of which are documented below (in "MISCELLANEOUS");
+@@ -1258,7 +1258,7 @@
+ rounded to direction $rnd. If $str was a valid number, then
+ $si will be set to 0. Else it will be set to -1.
+ If $si is -1 :
+- 1) the non-numeric flag (which was initalised to 0) will be
++ 1) the non-numeric flag (which was initialised to 0) will be
+ incremented. You can query/clear/reset the value of the
+ flag with (resp.) nnumflag()/clear_nnum()/set_nnum() - all
+ of which are documented below (in "MISCELLANEOUS");
+@@ -1949,7 +1949,7 @@
+ Return the number of bytes read, or if non-numeric characters were
+ encountered in the input, return 0.
+ If 0 is returned:
+- 1) the non-numeric flag (which was initalised to 0) will be
++ 1) the non-numeric flag (which was initialised to 0) will be
+ incremented. You can query/clear/reset the value of the
+ flag with (resp.) nnumflag()/clear_nnum()/set_nnum() - all
+ of which are documented below;
+@@ -2785,7 +2785,7 @@
+ which will set $max_len to 15.
+
+ That is, so long as your base 10 float consists of no more than 15
+- siginificant digits, you can pass it to a 53-bit double and back again,
++ significant digits, you can pass it to a 53-bit double and back again,
+ and be assured of retrieving the original value.
+ (Again, we assume absence of bugs and correct rounding practice.)
+
--
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libmath-mpfr-perl.git
More information about the Pkg-perl-cvs-commits
mailing list