Changeset 08db0a in git


Ignore:
Timestamp:
Feb 17, 2005, 10:49:22 AM (18 years ago)
Author:
Hans Schönemann <hannes@…>
Branches:
(u'jengelh-datetime', 'ceac47cbc86fe4a15902392bdbb9bd2ae0ea02c6')(u'spielwiese', 'a657104b677b4c461d018cbf3204d72d34ad66a9')
Children:
dee5f73edaad83fffbcbd97d0a093cf6ab348c0f
Parents:
b130fbdd904f0fcd5cd03e438f6daac7d8dc5125
Message:
*hannes: gcc-3.4


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

Legend:

Unmodified
Added
Removed
  • Singular/iparith.cc

    rb130fb r08db0a  
    22*  Computer Algebra System SINGULAR     *
    33****************************************/
    4 /* $Id: iparith.cc,v 1.339 2005-02-11 20:18:34 levandov Exp $ */
     4/* $Id: iparith.cc,v 1.340 2005-02-17 09:49:18 Singular Exp $ */
    55
    66/*
     
    29402940  int dummy;
    29412941  poly p=(poly)v->Data();
    2942   if (p!=NULL) res->data = (char *)pLDeg(p,&dummy);
     2942  if (p!=NULL) res->data = (char *)pLDeg(p,&dummy,currRing);
    29432943  else res->data=(char *)-1;
    29442944  return FALSE;
     
    29512951  int i;
    29522952  for(i=IDELEMS(I);i>=0;i--)
    2953     if (I->m[i]!=NULL) d=max(d,pLDeg(I->m[i],&dummy));
     2953    if (I->m[i]!=NULL) d=max(d,pLDeg(I->m[i],&dummy,currRing));
    29542954  res->data = (char *)d;
    29552955  return FALSE;
     
    31433143    {
    31443144      // now po!=NULL, p!=NULL
    3145       int d=(pFDeg(po)-(*w)[pGetComp(po)-1] - pFDeg(p)+(*w)[i-1]);
     3145      int d=(pFDeg(po,currRing)-(*w)[pGetComp(po)-1] - pFDeg(p,currRing)+(*w)[i-1]);
    31463146      if (d==0)
    31473147        d=pLmCmp(po,p);
     
    34303430{
    34313431  poly p=(poly)v->Data();
    3432   res->data=(char *)( p==NULL ? -1 : pFDeg(p) );
     3432  res->data=(char *)( p==NULL ? -1 : pFDeg(p,currRing) );
    34333433  return FALSE;
    34343434}
  • Singular/ipshell.cc

    rb130fb r08db0a  
    22*  Computer Algebra System SINGULAR     *
    33****************************************/
    4 /* $Id: ipshell.cc,v 1.96 2005-02-03 17:52:26 Singular Exp $ */
     4/* $Id: ipshell.cc,v 1.97 2005-02-17 09:49:20 Singular Exp $ */
    55/*
    66* ABSTRACT:
     
    34793479
    34803480  int ldummy;
    3481   int deg= pLDeg( gls, &ldummy );
     3481  int deg= pLDeg( gls, &ldummy, currRing );
    34823482  //  int deg= pDeg( gls );
    34833483  int len= pLength( gls );
  • Singular/janet.cc

    rb130fb r08db0a  
    3838//#define pow_(x) pDeg((x))
    3939pFDegProc jDeg;
    40 #define pow_(x) jDeg((x))
     40#define pow_(x) jDeg((x),currRing)
    4141
    4242void Debug()
  • Singular/tgb.cc

    rb130fb r08db0a  
    634634  int pq=pQuality(h,c,len);
    635635  i=simple_posInS(c->strat,h,pq);
    636   c->strat->enterS(P,i,c->strat);
     636  c->strat->enterS(P,i,c->strat,-1);
    637637 
    638638 
Note: See TracChangeset for help on using the changeset viewer.