Changeset 088e67 in git for kernel/kInline.h


Ignore:
Timestamp:
Feb 22, 2013, 12:03:48 PM (11 years ago)
Author:
Hans Schoenemann <hannes@…>
Branches:
(u'spielwiese', '17f1d200f27c5bd38f5dfc6e8a0879242279d1d8')
Children:
827ba06058f622edbc2440a3ab06dca5d1dd7377
Parents:
cd964c53d642e582814021fcaff539c2d63e6cc9
Message:
code simplification (kInline.h)
File:
1 edited

Legend:

Unmodified
Added
Removed
  • kernel/kInline.h

    rcd964c r088e67  
    1212
    1313#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,
    1515 *     if NO_KINLINE is not defined (AND ONLY THEN!)
    1616 * otherwise it is an part of kutil.cc and a source file!
     
    436436      number n;
    437437      if (t_p != NULL)
    438         {
    439           p_Cleardenom_n(t_p, tailRing, n);
    440           pSetCoeff0(p, pGetCoeff(t_p));
    441         }
     438        {
     439          p_Cleardenom_n(t_p, tailRing, n);
     440          pSetCoeff0(p, pGetCoeff(t_p));
     441        }
    442442      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        }
    450446      if (!nIsOne(n))
    451         {
    452           denominator_list denom=(denominator_list)omAlloc(sizeof(denominator_list_s));
    453           denom->n=nInvers(n);
    454           denom->next=DENOMINATOR_LIST;
    455           DENOMINATOR_LIST=denom;
    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        }
    457453      nDelete(&n);
    458454    }
     
    460456    {
    461457      if (t_p != NULL)
    462         {
    463           p_Cleardenom(t_p, tailRing);
    464           pSetCoeff0(p, pGetCoeff(t_p));
    465         }
     458        {
     459          p_Cleardenom(t_p, tailRing);
     460          pSetCoeff0(p, pGetCoeff(t_p));
     461        }
    466462      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        }
    474466    }
    475467}
     
    596588
    597589    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,
    599591                                    spNoether, tailRing );
    600592    pLength=lp+1;
     
    10461038  {
    10471039    p_SetComp(lcm,s, leadRing);
    1048   } 
     1040  }
    10491041  else if ((s=pGetComp(p2))!=0)
    10501042  {
    10511043    p_SetComp(lcm,s, leadRing);
    1052   } 
     1044  }
    10531045  // else p_SetComp(lcm,0,tailRing); // done by p_Init
    10541046
Note: See TracChangeset for help on using the changeset viewer.