Changeset e406de in git


Ignore:
Timestamp:
Mar 15, 1999, 5:55:42 PM (25 years ago)
Author:
Hans Schönemann <hannes@…>
Branches:
(u'spielwiese', '8e0ad00ce244dfd0756200662572aef8402f13d5')
Children:
d017b1ae6b39a6a201eaba488934eb88c33e9198
Parents:
bb354a914c634e35f8ef4d015eee5a1607c2d443
Message:
* hannes: fixed use of pNew/pInit


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

Legend:

Unmodified
Added
Removed

  • Singular/polys-impl.cc

    rbb354a re406de  
    22*  Computer Algebra System SINGULAR     *
    33****************************************/
    4 /* $Id: polys-impl.cc,v 1.21 1998-12-02 13:57:39 obachman Exp $ */
     4/* $Id: polys-impl.cc,v 1.22 1999-03-15 16:55:41 Singular Exp $ */
    55
    66/***************************************************************
    … …  
    376376  w = a = pNew();
    377377#endif
    378   memcpy(w,p,pMonomSize);
     378  pCopy2(w,p);
    379379  w->coef=nCopy(p->coef);
    380380  if (pNext(p)!=NULL)
    … …  
    388388      a = pNext(a) = pNew();
    389389#endif
    390       memcpy(a,p,pMonomSize);
     390      pCopy2(a,p);
    391391      a->coef=nCopy(p->coef);
    392392      pIter(p);

  • Singular/polys1.cc

    rbb354a re406de  
    22*  Computer Algebra System SINGULAR     *
    33****************************************/
    4 /* $Id: polys1.cc,v 1.18 1999-02-26 14:27:46 Singular Exp $ */
     4/* $Id: polys1.cc,v 1.19 1999-03-15 16:55:42 Singular Exp $ */
    55
    66/*
    … …  
    124124  a1 = p1;
    125125  a2 = p2;
    126   a = p  = pNew();
     126  a = p  = pInit();
    127127  nNew(&(p->coef));
    128128  loop

  • Singular/sparsmat.cc

    rbb354a re406de  
    22*  Computer Algebra System SINGULAR     *
    33****************************************/
    4 /* $Id: sparsmat.cc,v 1.4 1999-03-03 16:58:52 Singular Exp $ */
     4/* $Id: sparsmat.cc,v 1.5 1999-03-15 16:55:42 Singular Exp $ */
    55
    66/*
    … …  
    13641364    return;
    13651365  }
    1366   dummy = pNew();
     1366  dummy = pInit();
    13671367  do
    13681368  {
    … …  
    13781378    do
    13791379    {
    1380       h = pNext(h) = pNew();
    1381       pSetComp(h,0);
     1380      h = pNext(h) = pInit();
     1381      //pSetComp(h,0);
    13821382      for (i=pVariables; i; i--)
    13831383        pSetExp(h,i,pGetExp(a,i)+pGetExp(t,i));
    … …  
    14271427  }
    14281428  res = NULL;
    1429   e = pNew();
     1429  e = pInit();
    14301430  lead = FALSE;
    14311431  while (!lead)
    … …  
    15051505{
    15061506  const number x = pGetCoeff(b);
    1507   poly tail = pNext(b), e = pNew();
     1507  poly tail = pNext(b), e = pInit();
    15081508  poly h;
    15091509  number y, yn;
    … …  
    15591559  int i;
    15601560
    1561   h = res = pNew();
     1561  h = res = pInit();
    15621562  loop
    15631563  {
    1564     pSetComp(h,0);
     1564    //pSetComp(h,0);
    15651565    for (i=pVariables; i; i--)
    15661566      pSetExp(h,i,pGetExp(e,i)+pGetExp(t,i));
    … …  
    15731573      return res;
    15741574    }
    1575     h = pNext(h) = pNew();
     1575    h = pNext(h) = pInit();
    15761576  }
    15771577}
    … …  
    15961596  EXPONENT_TYPE w;
    15971597
    1598   r = h = res = pNew();
     1598  r = h = res = pInit();
    15991599  loop
    16001600  {
    … …  
    16091609    if (i == 0)
    16101610    {
    1611       pSetComp(h,0);
     1611      //pSetComp(h,0);
    16121612      pSetm(h);
    16131613      pSetCoeff0(h,nMult(y,x));
    … …  
    16181618      }
    16191619      r = h;
    1620       h = pNext(h) = pNew();
     1620      h = pNext(h) = pInit();
    16211621    }
    16221622    else if (t == NULL)
Note: See TracChangeset for help on using the changeset viewer.