Changeset 5f4463 in git for Singular/ipid.cc
- Timestamp:
- Apr 11, 2011, 6:39:34 PM (13 years ago)
- Branches:
- (u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')
- Children:
- 5beac5a8a177a4d4938cbc1e887bbd115a393f3a
- Parents:
- 16733868763266ec04dae72db238bced32663735
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
Singular/ipid.cc
r1673386 r5f4463 76 76 } 77 77 78 idhdl idrec::get(const char * s, int lev )78 idhdl idrec::get(const char * s, int level) 79 79 { 80 80 assume(s!=NULL); 81 assume((lev >=0) && (lev<=1000)); //not really, but if it isnt in that bounds..81 assume((level>=0) && (level<=1000)); //not really, but if it isnt in that bounds.. 82 82 idhdl h = this; 83 83 idhdl found=NULL; 84 84 int l; 85 const char *id ;85 const char *id_; 86 86 int i=iiS2I(s); 87 87 int less4=(i < (1<<24)); … … 90 90 omCheckAddr((ADDRESS)IDID(h)); 91 91 l=IDLEV(h); 92 if ((l==0)||(l==lev ))92 if ((l==0)||(l==level)) 93 93 { 94 94 if (i==h->id_i) 95 95 { 96 id =IDID(h);97 if (less4 || (0 == strcmp(s+4,id +4)))96 id_=IDID(h); 97 if (less4 || (0 == strcmp(s+4,id_+4))) 98 98 { 99 if (l==lev ) return h;99 if (l==level) return h; 100 100 found=h; 101 101 } … … 183 183 return (void *)0L; 184 184 } 185 idhdl idrec::set(const char * s, int lev , int t, BOOLEAN init)186 { 187 //printf("define %s, %x, lev : %d, typ: %d\n", s,s,lev,t);185 idhdl idrec::set(const char * s, int level, int t, BOOLEAN init) 186 { 187 //printf("define %s, %x, level: %d, typ: %d\n", s,s,level,t); 188 188 idhdl h = (idrec *)omAlloc0Bin(idrec_bin); 189 189 IDID(h) = s; 190 190 IDTYP(h) = t; 191 IDLEV(h) = lev ;191 IDLEV(h) = level; 192 192 IDNEXT(h) = this; 193 193 h->id_i=iiS2I(s);
Note: See TracChangeset
for help on using the changeset viewer.