Changeset 6acfb7 in git


Ignore:
Timestamp:
Nov 11, 2010, 2:57:04 PM (14 years ago)
Author:
Hans Schoenemann <hannes@…>
Branches:
(u'fieker-DuVal', '117eb8c30fc9e991c4decca4832b1d19036c4c65')(u'spielwiese', 'd25190065115c859833252500a64cfb7b11e3a50')
Children:
1ee17f728ae0a970f0bbdb9e57aedc97c536715b
Parents:
aefd2f31d20badf9f7185d9d99613be723e6b1b1
Message:
iiname2hdl, idhdl2id removed

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

Legend:

Unmodified
Added
Removed
  • Singular/ipid.cc

    raefd2f r6acfb7  
    727727}
    728728
    729 char *idhdl2id(idhdl pck, idhdl h)
    730 {
    731   char *name = (char *)omAlloc(strlen(pck->id) + strlen(h->id) + 3);
    732   sprintf(name, "%s::%s", pck->id, h->id);
    733   return(name);
    734 }
    735 
    736 void iiname2hdl(const char *name, idhdl *pck, idhdl *h)
    737 {
    738   const char *q = strchr(name, ':');
    739   char *p, *i;
    740 
    741   if(q==NULL)
    742   {
    743     p = omStrDup("");
    744     i = (char *)omAlloc(strlen(name)+1);
    745     *i = '\0';
    746     sscanf(name, "%s", i);
    747   }
    748   else {
    749     if( *(q+1) != ':') return;
    750     i = (char *)omAlloc(strlen(name)+1);
    751     *i = '\0';
    752     if(name == q)
    753     {
    754       p = omStrDup("");
    755       sscanf(name, "::%s", i);
    756     }
    757     else
    758     {
    759       p = (char *)omAlloc(strlen(name)+1);
    760       sscanf(name, "%[^:]::%s", p, i);
    761     }
    762   }
    763   //printf("Package: '%s'\n", p);
    764   //printf("Id Rec : '%s'\n", i);
    765   omFree(p);
    766   omFree(i);
    767 }
    768 
    769 #if 0
    770 char *getnamelev()
    771 {
    772   char buf[256];
    773   sprintf(buf, "(%s:%d)", namespaceroot->name,namespaceroot->lev);
    774   return(buf);
    775 }
    776 // warning: address of local variable `buf' returned
    777 #endif
    778 
    779729void proclevel::push(char *n)
    780730{
  • Singular/ipid.h

    raefd2f r6acfb7  
    8282/*extern ideal      currQuotient; in structs.h */
    8383
    84 char *idhdl2id(idhdl pck, idhdl h);
    85 void  iiname2hdl(const char *name, idhdl *pck, idhdl *id);
    8684idhdl enterid(const char * a, int lev, int t, idhdl* root, BOOLEAN init=TRUE, BOOLEAN serach=TRUE);
    8785idhdl ggetid(const char *n);
Note: See TracChangeset for help on using the changeset viewer.