Changeset 914b60 in git
- Timestamp:
- Jul 7, 2020, 1:39:18 PM (3 years ago)
- Branches:
- (u'spielwiese', '828514cf6e480e4bafc26df99217bf2a1ed1ef45')
- Children:
- 4de3dc02c6b3c86bc0d8323974a83f6f90d4ede79bd7cb708540aed8dc6ea40c071e5b0ff24576e9
- Parents:
- 249d818e57a3c49f4e561e2a5fe38db7dbc9f2c05077a383c48bb33609fae47828b72e91a10c545b
- Files:
-
- 10 edited
Legend:
- Unmodified
- Added
- Removed
-
Singular/dyn_modules/Order/nforder_ideal.cc
r249d81 r914b60 311 311 } else if (i<0) { 312 312 Werror("not done yet"); 313 return NULL; 313 314 } else { 314 315 nforder_ideal *B = nf_idPower(A, i/2); -
Singular/dyn_modules/cohomo/cohomo.cc
r249d81 r914b60 7 7 8 8 #include "kernel/mod2.h" 9 10 #if !defined(__CYGWIN__) || defined(STATIC_VERSION) 11 // acces from a module to routines from the main program 12 // does not work on windows (restrict of the dynamic linker), 13 // a static version is required: 14 // ./configure --with-builtinmodules=cohomo,... 15 9 16 10 17 #include "omalloc/omalloc.h" … … 38 45 #include <time.h> 39 46 40 41 42 43 44 45 46 47 /***************************print(only for debugging)***********************************************/ 47 48 //print vector of integers. … … 60 61 } 61 62 } 62 63 63 64 64 //print vector of vectors of integers. … … 92 92 } 93 93 } 94 95 96 97 94 98 95 //only for T^2, … … 1313 1310 { 1314 1311 fset.erase(fset.begin()+i); 1315 return fset; 1316 } 1317 } 1312 break; 1313 } 1314 } 1315 return fset; 1318 1316 } 1319 1317 … … 4135 4133 for(int i=0;i<bvs.size();i++) 4136 4134 { 4137 for(int j=0;j <bvs.size(), j!=i; j++)4135 for(int j=0;j!=i; j++) 4138 4136 { 4139 4137 vs.push_back(bvs[j]); … … 5333 5331 return MAX_TOK; 5334 5332 } 5335 5336 5337 5333 #endif 5338 5339 5334 #endif 5335 5336 -
Singular/dyn_modules/freealgebra/freealgebra.cc
r249d81 r914b60 1 1 #include "Singular/libsingular.h" 2 2 #include <vector> 3 4 #if !defined(__CYGWIN__) || defined(STATIC_VERSION) 5 // acces from a module to routines from the main program 6 // does not work on windows (restrict of the dynamic linker), 7 // a static version is required: 8 // ./configure --with-builtinmodules=freealgebra,... 3 9 4 10 #ifdef HAVE_SHIFTBBA … … 457 463 return (MAX_TOK); 458 464 } 465 #endif -
Singular/dyn_modules/subsets/subsets.cc
r249d81 r914b60 1 1 #include "Singular/libsingular.h" 2 3 #if !defined(__CYGWIN__) || defined(STATIC_VERSION) 4 // acces from a module to routines from the main program 5 // does not work on windows (restrict of the dynamic linker), 6 // a static version is required: 7 // ./configure --with-builtinmodules=subsets,... 2 8 3 9 #include <vector> … … 73 79 return (MAX_TOK); 74 80 } 81 #endif -
Singular/dyn_modules/systhreads/bytebuf.h
r249d81 r914b60 33 33 buf = allocate_space(cap); 34 34 memcpy(buf, other.buf, count); 35 return *this; 35 36 } 36 37 ~ByteBuf() { -
Singular/dyn_modules/systhreads/libthread.h
r249d81 r914b60 25 25 Job *startJob(ThreadPool *pool, Job *job, leftv arg); 26 26 Job *startJob(ThreadPool *pool, Job *job); 27 Job *scheduleJob(ThreadPool *pool, Job *job, long ndeps, Job **deps);27 // Job *scheduleJob(ThreadPool *pool, Job *job, long ndeps, Job **deps); 28 28 void cancelJob(Job *job); 29 29 void waitJob(Job *job); -
Singular/dyn_modules/systhreads/shared.cc
r249d81 r914b60 1480 1480 ts->active = false; 1481 1481 thread_lock.unlock(); 1482 return result; 1482 1483 } 1483 1484 … … 2492 2493 } 2493 2494 2494 Job *scheduleJob(ThreadPool *pool, Job *job, long ndeps, Job **deps) { 2495 if (job->pool) return NULL; 2496 pool->scheduler->lock.lock(); 2497 bool cancelled = false; 2498 job->addDep(ndeps, deps); 2499 for (long i = 0; i < ndeps; i++) { 2500 deps[i]->addNotify(job); 2501 cancelled |= deps[i]->cancelled; 2502 } 2503 if (cancelled) { 2504 job->pool = pool; 2505 pool->cancelJob(job); 2506 } 2507 else 2508 pool->attachJob(job); 2509 pool->scheduler->lock.unlock(); 2510 } 2495 // Job *scheduleJob(ThreadPool *pool, Job *job, long ndeps, Job **deps) { 2496 // if (job->pool) return NULL; 2497 // pool->scheduler->lock.lock(); 2498 // bool cancelled = false; 2499 // job->addDep(ndeps, deps); 2500 // for (long i = 0; i < ndeps; i++) { 2501 // deps[i]->addNotify(job); 2502 // cancelled |= deps[i]->cancelled; 2503 // } 2504 // if (cancelled) { 2505 // job->pool = pool; 2506 // pool->cancelJob(job); 2507 // } 2508 // else 2509 // pool->attachJob(job); 2510 // pool->scheduler->lock.unlock(); 2511 // return FIXME: missing/unclear what this is supposed to be 2512 // } 2511 2513 2512 2514 void cancelJob(Job *job) { -
Singular/eigenval_ip.cc
r249d81 r914b60 216 216 else 217 217 { 218 if( e->m[i0]==NULL&&!nGreaterZero(pGetCoeff(e->m[i1]))||219 e->m[i1]==NULL&&220 (nGreaterZero(pGetCoeff(e->m[i0]))||pNext(e->m[i0])!=NULL)||218 if((e->m[i0]==NULL&&!nGreaterZero(pGetCoeff(e->m[i1])))|| 219 (e->m[i1]==NULL&& 220 (nGreaterZero(pGetCoeff(e->m[i0]))||pNext(e->m[i0])!=NULL))|| 221 221 e->m[i0]!=NULL&&e->m[i1]!=NULL&& 222 (pNext(e->m[i0])!=NULL&&pNext(e->m[i1])==NULL||223 pNext(e->m[i0])==NULL&&pNext(e->m[i1])==NULL&&224 nGreater(pGetCoeff(e->m[i0]),pGetCoeff(e->m[i1]))))222 ((pNext(e->m[i0])!=NULL&&pNext(e->m[i1])==NULL)|| 223 (pNext(e->m[i0])==NULL&&pNext(e->m[i1])==NULL&& 224 nGreater(pGetCoeff(e->m[i0]),pGetCoeff(e->m[i1]))))) 225 225 { 226 226 poly e1=e->m[i0]; -
Singular/svd_si.h
r249d81 r914b60 3225 3225 return; 3226 3226 } 3227 ap::ap_error::make_assertion(fromtheright && zcolumns==m || !fromtheright &&zrows==m);3227 ap::ap_error::make_assertion(fromtheright ? zcolumns==m : zrows==m); 3228 3228 3229 3229 // … … 3452 3452 return; 3453 3453 } 3454 ap::ap_error::make_assertion(fromtheright && zcolumns==n || !fromtheright &&zrows==n);3454 ap::ap_error::make_assertion(fromtheright ? zcolumns==n : zrows==n); 3455 3455 3456 3456 // … … 3860 3860 return; 3861 3861 } 3862 ap::ap_error::make_assertion(fromtheright && zcolumns==m || !fromtheright &&zrows==m);3862 ap::ap_error::make_assertion(fromtheright ? zcolumns==m : zrows==m); 3863 3863 3864 3864 // … … 4075 4075 return; 4076 4076 } 4077 ap::ap_error::make_assertion(fromtheright && zcolumns==n || !fromtheright &&zrows==n);4077 ap::ap_error::make_assertion(fromtheright ? zcolumns==n : zrows==n); 4078 4078 4079 4079 // … … 6897 6897 // First apply standard test to bottom of matrix 6898 6898 // 6899 if( amp::abs<Precision>(e(m-1))<=amp::abs<Precision>(tol)*amp::abs<Precision>(d(m)) || tol<0 && amp::abs<Precision>(e(m-1))<=thresh)6899 if( amp::abs<Precision>(e(m-1))<=amp::abs<Precision>(tol)*amp::abs<Precision>(d(m)) || (tol<0 && amp::abs<Precision>(e(m-1))<=thresh) ) 6900 6900 { 6901 6901 e(m-1) = 0; … … 6937 6937 // First apply standard test to top of matrix 6938 6938 // 6939 if( amp::abs<Precision>(e(ll))<=amp::abs<Precision>(tol)*amp::abs<Precision>(d(ll)) || tol<0 && amp::abs<Precision>(e(ll))<=thresh)6939 if( amp::abs<Precision>(e(ll))<=amp::abs<Precision>(tol)*amp::abs<Precision>(d(ll)) || (tol<0 && amp::abs<Precision>(e(ll))<=thresh) ) 6940 6940 { 6941 6941 e(ll) = 0; -
factory/cf_gcd.cc
r249d81 r914b60 101 101 if ( getCharacteristic() != 0 ) 102 102 { 103 if (0) ;// dummy, to be able to build without NTL and FLINT103 if (0) {} // dummy, to be able to build without NTL and FLINT 104 104 #if defined(HAVE_FLINT) && ( __FLINT_RELEASE >= 20503) 105 105 if ( isOn( SW_USE_FL_GCD_P)
Note: See TracChangeset
for help on using the changeset viewer.