mirror of
https://src.fedoraproject.org/rpms/sagemath.git
synced 2025-04-22 11:45:56 -04:00
Update to sagemath 6.8
This commit is contained in:
parent
b4699213da
commit
3aa9b0c734
32 changed files with 806 additions and 615 deletions
|
@ -1,50 +1,6 @@
|
|||
--- ./src/c_lib/include/ntl_wrap.h.orig 2015-02-16 17:15:08.000000000 -0700
|
||||
+++ ./src/c_lib/include/ntl_wrap.h 2015-09-25 13:51:18.989444339 -0600
|
||||
@@ -35,7 +35,7 @@ using namespace NTL;
|
||||
|
||||
EXTERN void del_charstar(char*);
|
||||
|
||||
-EXTERN void setup_NTL_error_callback(void (*function)(const char*, void*), void* context);
|
||||
+EXTERN void setup_NTL_error_callback(void (*function)(const char*));
|
||||
|
||||
//////// ZZ //////////
|
||||
|
||||
--- ./src/c_lib/src/ntl_wrap.cpp.orig 2015-02-16 17:15:08.000000000 -0700
|
||||
+++ ./src/c_lib/src/ntl_wrap.cpp 2015-09-25 13:49:54.636142928 -0600
|
||||
@@ -12,9 +12,9 @@ void del_charstar(char* a) {
|
||||
}
|
||||
|
||||
|
||||
-void setup_NTL_error_callback(void (*function)(const char*, void*), void* context)
|
||||
+void setup_NTL_error_callback(void (*function)(const char*))
|
||||
{
|
||||
- NTL::SetErrorCallbackFunction(function, context);
|
||||
+ NTL::ErrorMsgCallback = function;
|
||||
}
|
||||
|
||||
|
||||
--- ./src/c_lib/src/stdsage.c.orig 2015-02-16 17:15:08.000000000 -0700
|
||||
+++ ./src/c_lib/src/stdsage.c 2015-09-25 13:50:22.081963425 -0600
|
||||
@@ -36,7 +36,7 @@ void init_global_empty_tuple(void) {
|
||||
We raise a RuntimeError and then call sig_error() such that the
|
||||
exception will be seen by sig_on().
|
||||
*/
|
||||
-void global_NTL_error_callback(const char* s, void* context)
|
||||
+void global_NTL_error_callback(const char* s)
|
||||
{
|
||||
PyErr_SetString(PyExc_RuntimeError, s);
|
||||
sig_error();
|
||||
@@ -49,7 +49,7 @@ void init_csage() {
|
||||
init_global_empty_tuple();
|
||||
init_memory_functions();
|
||||
setup_sage_signal_handler();
|
||||
- setup_NTL_error_callback(global_NTL_error_callback, NULL);
|
||||
+ setup_NTL_error_callback(global_NTL_error_callback);
|
||||
}
|
||||
|
||||
/* This is called once for every single module that links in stdsage */
|
||||
--- ./src/sage/rings/bernmm/bernmm-test.cpp.orig 2015-02-16 17:15:12.000000000 -0700
|
||||
+++ ./src/sage/rings/bernmm/bernmm-test.cpp 2015-09-26 09:19:00.830399741 -0600
|
||||
diff -up src/sage/rings/bernmm/bernmm-test.cpp.orig src/sage/rings/bernmm/bernmm-test.cpp
|
||||
--- src/sage/rings/bernmm/bernmm-test.cpp.orig 2015-10-11 18:17:42.808860675 -0300
|
||||
+++ src/sage/rings/bernmm/bernmm-test.cpp 2015-10-11 18:18:44.684863044 -0300
|
||||
@@ -70,7 +70,7 @@ void bern_naive(mpq_t* res, long n)
|
||||
*/
|
||||
int testcase__bern_modp_powg(long p, long k, mpq_t b)
|
||||
|
@ -63,8 +19,9 @@
|
|||
|
||||
if (PowerMod(2, k, p, pinv) == 1)
|
||||
return 1;
|
||||
--- ./src/sage/rings/bernmm/bern_modp.cpp.orig 2015-02-16 17:15:12.000000000 -0700
|
||||
+++ ./src/sage/rings/bernmm/bern_modp.cpp 2015-09-26 14:15:34.862360481 -0600
|
||||
diff -up src/sage/rings/bernmm/bern_modp.cpp.orig src/sage/rings/bernmm/bern_modp.cpp
|
||||
--- src/sage/rings/bernmm/bern_modp.cpp.orig 2015-10-11 18:17:42.814860675 -0300
|
||||
+++ src/sage/rings/bernmm/bern_modp.cpp 2015-10-11 18:20:28.077867003 -0300
|
||||
@@ -43,14 +43,14 @@ namespace bernmm {
|
||||
pinv = 1 / ((double) p)
|
||||
g = a multiplicative generator of GF(p), in [0, p)
|
||||
|
@ -118,15 +75,6 @@
|
|||
{
|
||||
Factorisation F(p-1);
|
||||
long g = primitive_root(p, pinv, F);
|
||||
@@ -717,7 +717,7 @@ long _bern_modp_pow2(long p, double pinv
|
||||
2 <= k <= p-3, k even
|
||||
pinv = 1 / ((double) p)
|
||||
*/
|
||||
-long _bern_modp(long p, double pinv, long k)
|
||||
+long _bern_modp(long p, mulmod_t pinv, long k)
|
||||
{
|
||||
if (PowerMod(2, k, p, pinv) != 1)
|
||||
// 2^k != 1 mod p, so we use the faster version
|
||||
@@ -765,7 +765,7 @@ long bern_modp(long p, long k)
|
||||
if (m == 0)
|
||||
return -1;
|
||||
|
@ -136,8 +84,9 @@
|
|||
long x = _bern_modp(p, pinv, m); // = B_m/m mod p
|
||||
return MulMod(x, k, p, pinv);
|
||||
}
|
||||
--- ./src/sage/rings/bernmm/bern_modp.h.orig 2015-02-16 17:15:12.000000000 -0700
|
||||
+++ ./src/sage/rings/bernmm/bern_modp.h 2015-09-26 09:19:28.365229754 -0600
|
||||
diff -up src/sage/rings/bernmm/bern_modp.h.orig src/sage/rings/bernmm/bern_modp.h
|
||||
--- src/sage/rings/bernmm/bern_modp.h.orig 2015-10-11 18:17:42.820860675 -0300
|
||||
+++ src/sage/rings/bernmm/bern_modp.h 2015-10-11 18:20:53.453867975 -0300
|
||||
@@ -12,6 +12,7 @@
|
||||
#ifndef BERNMM_BERN_MODP_H
|
||||
#define BERNMM_BERN_MODP_H
|
||||
|
@ -157,8 +106,9 @@
|
|||
|
||||
|
||||
};
|
||||
--- ./src/sage/rings/bernmm/bern_modp_util.cpp.orig 2015-02-16 17:15:12.000000000 -0700
|
||||
+++ ./src/sage/rings/bernmm/bern_modp_util.cpp 2015-09-26 09:19:57.474935651 -0600
|
||||
diff -up src/sage/rings/bernmm/bern_modp_util.cpp.orig src/sage/rings/bernmm/bern_modp_util.cpp
|
||||
--- src/sage/rings/bernmm/bern_modp_util.cpp.orig 2015-10-11 18:17:42.825860675 -0300
|
||||
+++ src/sage/rings/bernmm/bern_modp_util.cpp 2015-10-11 18:21:24.653869170 -0300
|
||||
@@ -20,7 +20,7 @@ NTL_CLIENT;
|
||||
namespace bernmm {
|
||||
|
||||
|
@ -186,8 +136,9 @@
|
|||
{
|
||||
if (p == 2)
|
||||
return 1;
|
||||
--- ./src/sage/rings/bernmm/bern_modp_util.h.orig 2015-02-16 17:15:12.000000000 -0700
|
||||
+++ ./src/sage/rings/bernmm/bern_modp_util.h 2015-09-26 09:20:26.423623021 -0600
|
||||
diff -up src/sage/rings/bernmm/bern_modp_util.h.orig src/sage/rings/bernmm/bern_modp_util.h
|
||||
--- src/sage/rings/bernmm/bern_modp_util.h.orig 2015-10-11 18:17:42.830860676 -0300
|
||||
+++ src/sage/rings/bernmm/bern_modp_util.h 2015-10-11 18:21:58.044870449 -0300
|
||||
@@ -17,6 +17,7 @@
|
||||
#include <vector>
|
||||
#include <cassert>
|
||||
|
@ -221,3 +172,15 @@
|
|||
|
||||
|
||||
}; // end namespace
|
||||
diff -up src/sage/rings/bernmm/bern_modp.cpp.orig src/sage/rings/bernmm/bern_modp.cpp
|
||||
--- src/sage/rings/bernmm/bern_modp.cpp.orig 2015-11-02 23:58:56.669503117 -0200
|
||||
+++ src/sage/rings/bernmm/bern_modp.cpp 2015-11-02 23:59:15.683503846 -0200
|
||||
@@ -717,7 +717,7 @@ long _bern_modp_pow2(long p, mulmod_t pi
|
||||
2 <= k <= p-3, k even
|
||||
pinv = 1 / ((double) p)
|
||||
*/
|
||||
-long _bern_modp(long p, double pinv, long k)
|
||||
+long _bern_modp(long p, mulmod_t pinv, long k)
|
||||
{
|
||||
if (PowerMod(2, k, p, pinv) != 1)
|
||||
// 2^k != 1 mod p, so we use the faster version
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue