Changeset 088e67 in git for kernel/kInline.h
- Timestamp:
- Feb 22, 2013, 12:03:48 PM (10 years ago)
- Branches:
- (u'jengelh-datetime', 'ceac47cbc86fe4a15902392bdbb9bd2ae0ea02c6')(u'spielwiese', 'a800fe4b3e9d37a38c5a10cc0ae9dfa0c15a4ee6')
- Children:
- 827ba06058f622edbc2440a3ab06dca5d1dd7377
- Parents:
- cd964c53d642e582814021fcaff539c2d63e6cc9
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
kernel/kInline.h
rcd964c r088e67 12 12 13 13 #if !defined(NO_KINLINE) || defined(KUTIL_CC) 14 /* this file is a header file with inline routines, 14 /* this file is a header file with inline routines, 15 15 * if NO_KINLINE is not defined (AND ONLY THEN!) 16 16 * otherwise it is an part of kutil.cc and a source file! … … 436 436 number n; 437 437 if (t_p != NULL) 438 439 440 441 438 { 439 p_Cleardenom_n(t_p, tailRing, n); 440 pSetCoeff0(p, pGetCoeff(t_p)); 441 } 442 442 else 443 { 444 #ifdef HAVE_RATGRING 445 p_Cleardenom_n(p, currRing, n); 446 #else 447 p_Cleardenom_n(p, currRing, n); 448 #endif 449 } 443 { 444 p_Cleardenom_n(p, currRing, n); 445 } 450 446 if (!nIsOne(n)) 451 452 453 454 455 456 447 { 448 denominator_list denom=(denominator_list)omAlloc(sizeof(denominator_list_s)); 449 denom->n=nInvers(n); 450 denom->next=DENOMINATOR_LIST; 451 DENOMINATOR_LIST=denom; 452 } 457 453 nDelete(&n); 458 454 } … … 460 456 { 461 457 if (t_p != NULL) 462 463 464 465 458 { 459 p_Cleardenom(t_p, tailRing); 460 pSetCoeff0(p, pGetCoeff(t_p)); 461 } 466 462 else 467 { 468 #ifdef HAVE_RATGRING 469 p_Cleardenom(p, currRing); 470 #else 471 p_Cleardenom(p, currRing); 472 #endif 473 } 463 { 464 p_Cleardenom(p, currRing); 465 } 474 466 } 475 467 } … … 596 588 597 589 int lp=pLength-1; 598 pNext(_p) = p_Minus_mm_Mult_qq( pNext(_p), m, q, lp, lq, 590 pNext(_p) = p_Minus_mm_Mult_qq( pNext(_p), m, q, lp, lq, 599 591 spNoether, tailRing ); 600 592 pLength=lp+1; … … 1046 1038 { 1047 1039 p_SetComp(lcm,s, leadRing); 1048 } 1040 } 1049 1041 else if ((s=pGetComp(p2))!=0) 1050 1042 { 1051 1043 p_SetComp(lcm,s, leadRing); 1052 } 1044 } 1053 1045 // else p_SetComp(lcm,0,tailRing); // done by p_Init 1054 1046
Note: See TracChangeset
for help on using the changeset viewer.