Changeset 414c7d0 in git
- Timestamp:
- Jul 26, 2009, 10:16:24 PM (14 years ago)
- Branches:
- (u'spielwiese', '828514cf6e480e4bafc26df99217bf2a1ed1ef45')
- Children:
- 66c9621763744972721394454948bf15c181da23
- Parents:
- 8fea2911be295a6a054de2c9efca75a14d2a364a
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
kernel/ring.cc
r8fea29 r414c7d0 2 2 * Computer Algebra System SINGULAR * 3 3 ****************************************/ 4 /* $Id: ring.cc,v 1.12 3 2009-07-20 12:00:51motsak Exp $ */4 /* $Id: ring.cc,v 1.124 2009-07-26 20:16:24 motsak Exp $ */ 5 5 6 6 /* … … 2693 2693 case ringorder_S: 2694 2694 { 2695 #ifndef NDEBUG 2695 2696 dReportError("Error: unhandled ordering in rModifyRing: ringorder_S = [%d]", r_ord); 2697 #endif 2696 2698 order[j]=r_ord; /*r->order[i];*/ 2697 2699 break; … … 2759 2761 if (omit_comp) 2760 2762 { 2761 dReportError("Error: WRONG USAGE of rModifyRing: cannot omit component due to the ordering block [%d]: %d", i, r_ord); 2763 #ifndef NDEBUG 2764 Warn("WRONG USAGE? of rModifyRing: omitting component due to the ordering block [%d]: %d", i, r_ord); 2765 #endif 2762 2766 omit_comp = FALSE; 2763 2767 } … … 2864 2868 if ( nc_rComplete(r, res, false) ) // no qideal! 2865 2869 { 2870 #ifndef NDEBUG 2866 2871 WarnS("error in nc_rComplete"); 2872 #endif 2867 2873 // cleanup? 2868 2874 … … 2919 2925 if ( nc_rComplete(r, res, false) ) // no qideal! 2920 2926 { 2927 #ifndef NDEBUG 2921 2928 WarnS("error in nc_rComplete"); 2929 #endif 2922 2930 // cleanup? 2923 2931 … … 2979 2987 if ( nc_rComplete(r, res, false) ) // no qideal! 2980 2988 { 2989 #ifndef NDEBUG 2981 2990 WarnS("error in nc_rComplete"); 2982 // cleanup? 2991 #endif 2992 // cleanup? 2983 2993 2984 2994 // rDelete(res); … … 3792 3802 } else if (r->typ[i].ord_typ == ro_syzcomp) 3793 3803 { 3804 #ifndef NDEBUG 3794 3805 Warn( "rUnComplete : ord_typ == ro_syzcomp was unhandled!!! Possibly memory leak!!!" ); 3806 #endif 3795 3807 } 3796 3808 … … 4218 4230 if ( (r->order[0] == ringorder_IS) ) 4219 4231 { 4232 #ifndef NDEBUG 4220 4233 WarnS("rAssure_SyzComp in an IS ring!"); 4234 #endif 4221 4235 // return r; 4222 4236 } … … 4252 4266 if ( nc_rComplete(r, res, false) ) // no qideal! 4253 4267 { 4268 #ifndef NDEBUG 4254 4269 WarnS("error in nc_rComplete"); // cleanup?// rDelete(res);// return r; // just go on.. 4270 #endif 4255 4271 } 4256 4272 } … … 4374 4390 if ( nc_rComplete(r, res, false) ) // no qideal! 4375 4391 { 4392 #ifndef NDEBUG 4376 4393 WarnS("error in nc_rComplete"); 4377 // just go on.. 4394 #endif 4395 // just go on.. 4378 4396 } 4379 4397 } … … 4444 4462 if ( nc_rComplete(r, new_r, false) ) // no qideal! 4445 4463 { 4464 #ifndef NDEBUG 4446 4465 WarnS("error in nc_rComplete"); // cleanup?// rDelete(res);// return r; // just go on.. 4466 #endif 4447 4467 } 4448 4468 } … … 4493 4513 if ( nc_rComplete(r, new_r, false) ) // no qideal! 4494 4514 { 4515 #ifndef NDEBUG 4495 4516 WarnS("error in nc_rComplete"); // cleanup?// rDelete(res);// return r; // just go on.. 4517 #endif 4496 4518 } 4497 4519 } … … 4520 4542 if( nc_SetupQuotient(new_r, old_r, true) ) 4521 4543 { 4544 #ifndef NDEBUG 4522 4545 WarnS("error in nc_SetupQuotient"); // cleanup? rDelete(res); return r; // just go on...? 4546 #endif 4523 4547 } 4524 4548 #endif … … 4554 4578 if ( nc_rComplete(old_r, new_r, false) ) // no qideal! 4555 4579 { 4580 #ifndef NDEBUG 4556 4581 WarnS("error in nc_rComplete"); // cleanup? rDelete(res); return r; // just go on...? 4557 } 4582 #endif 4583 } 4558 4584 } 4559 4585 assume(rIsPluralRing(new_r) == rIsPluralRing(old_r)); … … 4569 4595 if( nc_SetupQuotient(new_r, old_r, true) ) 4570 4596 { 4597 #ifndef NDEBUG 4571 4598 WarnS("error in nc_SetupQuotient"); // cleanup? rDelete(res); return r; // just go on...? 4599 #endif 4572 4600 } 4573 4601 #endif … … 4707 4735 if ( nc_rComplete(r, res, false) ) // no qideal! 4708 4736 { 4737 #ifndef NDEBUG 4709 4738 WarnS("error in nc_rComplete"); // cleanup?// rDelete(res);// return r; // just go on.. 4739 #endif 4710 4740 } 4711 4741 } … … 4898 4928 { 4899 4929 // (currRing->typ[currRing->typ[0].data.isTemp.suffixpos].data.is.limit == k) 4930 #ifndef NDEBUG 4900 4931 Warn("rSetSyzComp(%d) in an IS ring! Be careful!", k); 4932 #endif 4901 4933 } else 4902 4934 if ((currRing->order[0]!=ringorder_c) && (k!=0)) // ???
Note: See TracChangeset
for help on using the changeset viewer.