Changeset 8fc4bee in git


Ignore:
Timestamp:
Jun 17, 1997, 12:59:34 PM (27 years ago)
Author:
Hans Schönemann <hannes@…>
Branches:
(u'fieker-DuVal', '117eb8c30fc9e991c4decca4832b1d19036c4c65')(u'spielwiese', 'b52fc4b2495505785981d640dcf7eb3e456778ef')
Children:
9ad935177576d9011edc974b97d0ef31944b5b86
Parents:
24adf54fb7f626522da625e77ab274b96978935d
Message:
* hannes: fixed rationals in factorize(clapsing.cc)
          fixed gmp-initalization (mminit.cc)


git-svn-id: file:///usr/local/Singular/svn/trunk@393 2c84dea3-7e68-4137-9b89-c4e89433aadc
Location:
Singular
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • Singular/clapsing.cc

    r24adf5 r8fc4bee  
    33*  Computer Algebra System SINGULAR     *
    44****************************************/
    5 // $Id: clapsing.cc,v 1.7 1997-06-04 19:45:09 obachman Exp $
     5// $Id: clapsing.cc,v 1.8 1997-06-17 10:59:33 Singular Exp $
    66/*
    77* ABSTRACT: interface between Singular and factory
     
    300300    if (nGetChar()==0) /* Q */
    301301    {
    302       if ((with_exps!=0)&&(f!=NULL))
    303       {
    304         N=nCopy(pGetCoeff(f));
    305         pContent(f);
    306         number nn=nDiv(N,pGetCoeff(f));
    307         nDelete(&N);
    308         N=nn;
     302      if (f!=NULL)
     303      {
     304        if (with_exps==0)
     305          N=nCopy(pGetCoeff(f));
     306        pCleardenom(f);
     307        if (with_exps==0)
     308        {
     309          number nn=nDiv(N,pGetCoeff(f));
     310          nDelete(&N);
     311          N=nn;
     312        } 
    309313      } 
    310314    }
  • Singular/mminit.cc

    r24adf5 r8fc4bee  
    22*  Computer Algebra System SINGULAR     *
    33****************************************/
    4 /* $Id: mminit.cc,v 1.5 1997-04-24 18:01:30 Singular Exp $ */
     4/* $Id: mminit.cc,v 1.6 1997-06-17 10:59:34 Singular Exp $ */
    55/*
    66* ABSTRACT: init of memory management
     
    174174  }
    175175#endif
     176  mmIsInitialized=1;
    176177  return 1;
    177178}
Note: See TracChangeset for help on using the changeset viewer.