Changeset 6acfb7 in git

Timestamp:

Nov 11, 2010, 2:57:04 PM (13 years ago)

Author:

Hans Schoenemann <hannes@…>

Branches:

(u'spielwiese', '828514cf6e480e4bafc26df99217bf2a1ed1ef45')

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:

• ipid.cc (modified) (1 diff)
• ipid.h (modified) (1 diff)

Singular/ipid.cc

@@ -727 +727 @@
 }
 
-char *idhdl2id(idhdl pck, idhdl h)
-{
-  char *name = (char *)omAlloc(strlen(pck->id) + strlen(h->id) + 3);
-  sprintf(name, "%s::%s", pck->id, h->id);
-  return(name);
-}
-
-void iiname2hdl(const char *name, idhdl *pck, idhdl *h)
-{
-  const char *q = strchr(name, ':');
-  char *p, *i;
-
-  if(q==NULL)
-  {
-    p = omStrDup("");
-    i = (char *)omAlloc(strlen(name)+1);
-    *i = '\0';
-    sscanf(name, "%s", i);
-  }
-  else {
-    if( *(q+1) != ':') return;
-    i = (char *)omAlloc(strlen(name)+1);
-    *i = '\0';
-    if(name == q)
-    {
-      p = omStrDup("");
-      sscanf(name, "::%s", i);
-    }
-    else
-    {
-      p = (char *)omAlloc(strlen(name)+1);
-      sscanf(name, "%[^:]::%s", p, i);
-    }
-  }
-  //printf("Package: '%s'\n", p);
-  //printf("Id Rec : '%s'\n", i);
-  omFree(p);
-  omFree(i);
-}
-
-#if 0
-char *getnamelev()
-{
-  char buf[256];
-  sprintf(buf, "(%s:%d)", namespaceroot->name,namespaceroot->lev);
-  return(buf);
-}
-// warning: address of local variable `buf' returned
-#endif
-
 void proclevel::push(char *n)
 {

Singular/ipid.h

@@ -82 +82 @@
 /*extern ideal      currQuotient; in structs.h */
 
-char *idhdl2id(idhdl pck, idhdl h);
-void  iiname2hdl(const char *name, idhdl *pck, idhdl *id);
 idhdl enterid(const char * a, int lev, int t, idhdl* root, BOOLEAN init=TRUE, BOOLEAN serach=TRUE);
 idhdl ggetid(const char *n);