Changeset 4c9cf1 in git


Ignore:
Timestamp:
Apr 16, 2013, 4:32:09 PM (11 years ago)
Author:
Hans Schoenemann <hannes@…>
Branches:
(u'spielwiese', '5b153614cbc72bfa198d75b1e9e33dab2645d9fe')
Children:
4740e8c847a5edf6f11b097ddc27bdabb94d3929
Parents:
cb157aa890f385c73cfbcce78a68fecb61a51f84
Message:
fix: tr. #486 (test for par. name)

from master
File:
1 edited

Legend:

Unmodified
Added
Removed
  • Singular/subexpr.cc

    rcb157a r4c9cf1  
    118118          break;
    119119        case PACKAGE_CMD:
    120           PrintNSpaces(spaces);
    121           paPrint(n,(package)d);
    122           break;
     120          PrintNSpaces(spaces);
     121          paPrint(n,(package)d);
     122          break;
    123123        case NONE:
    124124          return;
     
    740740            s = (char*) omAlloc(strlen(ps) + 10);
    741741            sprintf(s,"%s(%s)", (t /*Typ()*/ == POLY_CMD ? "poly" : "vector"), ps);
    742             omFree(ps);
     742            omFree(ps);
    743743            return s;
    744744          }
     
    846846          else
    847847            return omStrDup(s);
    848         } 
     848        }
    849849
    850850        case RING_CMD:
     
    13881388  * 2) `basering` / 'Current`
    13891389  * 3) existing identifier, local
    1390   * 4) ringvar, local ring
     1390  * 4) ringvar, ringpar, local ring
    13911391  * 5) existing identifier, global
    13921392  * 6) monom (resp. number), local ring: consisting of:
    1393   * 6') ringvar, global ring
     1393  * 6') ringvar,  ringpar,global ring
    13941394  * 6'') monom (resp. number), local ring
    13951395  * 7) monom (resp. number), non-local ring
     
    14801480        v->rtyp = POLY_CMD;
    14811481        return;
     1482      }
     1483      if(rField_is_Extension(currRing)&&((vnr=r_IsRingVar(id, currRing->cf->extRing))>=0))
     1484      {
     1485        BOOLEAN ok=FALSE;
     1486        poly p = pmInit(id,ok);
     1487        if (ok)
     1488        {
     1489          v->data = pGetCoeff(p);
     1490          pGetCoeff(p)=NULL;
     1491          pLmFree(p);
     1492          v->rtyp = NUMBER_CMD;
     1493          v->name = id;
     1494          return;
     1495        }
    14821496      }
    14831497    }
Note: See TracChangeset for help on using the changeset viewer.