dapdump.c#619dumplistraw(NClistl)
#621    fprintf(stderr,"%s\n",dcerawlisttostring(l));
#627dumpstringlist(NClistl)
#630    for(i=0;i<nclistlength(l);i++) {
#631 const char* s = (const char*)nclistget(l,i);
daputil.c#325nclistdeleteall(NClistl, void* elem)
#330    len = nclistlength(l);
#332 void* test = nclistget(l,i);
#334     nclistremove(l,i);
dvarget.c#496     size_t l = (length[idim] * (size_t)memtypelen);
#497     value -= l;
dvarput.c#477     size_t l = (length[idim] * (size_t)memtypelen);
#478     value -= l;
escapes.c#557    int l = strlen(s);
#564    char* newname = poolalloc(l*7+1);
list.c#23  Listl;
#30  l = (List*)malloc(sizeof(List));
#31  if(l) {
#32    l->alloc=0;
#33    l->length=0;
#34    l->content=NULL;
#36  return l;
#40listfree(Listl)
#42  if(l) {
#43    l->alloc = 0;
#44    if(l->content != NULL) {free(l->content); l->content = NULL;}
#45    free(l);
#51listsetalloc(Listl, unsigned long sz)
#54  if(l == NULL) return FALSE;
#55  if(sz <= 0) {sz = (l->length?2*l->length:DEFAULTALLOC);}
#56  if(l->alloc >= sz) {return TRUE;}
#58  if(newcontent != NULL && l->alloc > 0 && l->length > 0 && l->content != NULL) {
#59    memcpy((void*)newcontent,(void*)l->content,sizeof(void*)*l->length);
#61  if(l->content != NULL) free(l->content);
#62  l->content=newcontent;
#63  l->alloc=sz;
#68listsetlength(Listl, unsigned long sz)
#70  if(l == NULL) return FALSE;
#71  if(sz > l->alloc && !listsetalloc(l,sz)) return FALSE;
#72  l->length = sz;
#77listget(Listl, unsigned long index)
#79  if(l == NULL || l->length == 0) return NULL;
#80  if(index >= l->length) return NULL;
#81  return l->content[index];
#85listset(Listl, unsigned long index, void* elem)
#87  if(l == NULL) return FALSE;
#88  if(index >= l->length) return FALSE;
#89  l->content[index] = elem;
#95listinsert(Listl, unsigned long index, void* elem)
#98  if(l == NULL) return FALSE;
#99  if(index > l->length) return FALSE;
#100  listsetalloc(l,0);
#101  for(i=(int)l->length;i>index;i--) l->content[i] = l->content[i-1];
#102  l->content[index] = elem;
#103  l->length++;
#108listpush(Listl, void* elem)
#110  if(l == NULL) return FALSE;
#111  if(l->length >= l->alloclistsetalloc(l,0);
#112  l->content[l->length] = elem;
#113  l->length++;
#118listpop(Listl)
#120  if(l == NULL || l->length == 0) return NULL;
#121  l->length--;
#122  return l->content[l->length];
#126listtop(Listl)
#128  if(l == NULL || l->length == 0) return NULL;
#129  return l->content[l->length - 1];
#133listremove(Listl, unsigned long i)
#137  if(l == NULL || (len=l->length) == 0) return NULL;
#139  elem = l->content[i];
#140  for(i+=1;i<len;i++) l->content[i-1] = l->content[i];
#141  l->length--;
#147listdup(Listl)
#149    void** result = (void**)malloc(sizeof(void*)*(l->length+1));
#150    memcpy((void*)result,(void*)l->content,sizeof(void*)*l->length);
#151    result[l->length] = (void*)0;
#156listcontains(Listl, void* elem)
#159    for(i=0;i<listlength(l);i++) {
#160 if(elem == listget(l,i)) return 1;
#167listelemremove(Listl, void* elem)
#172  if(l == NULL || (len=l->length) == 0) return 0;
#173  for(i=0;i<listlength(l);i++) {
#174    void* candidate = l->content[i];
#176      for(i+=1;i<len;i++) l->content[i-1] = l->content[i];
#177      l->length--;
#194listunique(Listl)
#198    if(l == NULL || l->length == 0) return 1;
#199    len = l->length;
#200    content = l->content;
#210    l->length = len;
#215listclone(Listl)
#218    *clone = *l;
#219    clone->content = listdup(l);
list.h#34EXTERNC void* listremove(Listl, unsigned long i);
#48EXTERNC int listelemremove(Listl, void* elem);
#57#define listclear(llistsetlength((l),0)
#58#define listextend(l,lenlistsetalloc((l),(len)+(l->alloc))
#59#define listcontents(l)  ((l)==NULL?NULL:(l)->content)
#60#define listlength(l)  ((l)==NULL?0:(int)(l)->length)
lookup3.c#821  uint32_t c[HASHSTATE], d[HASHSTATE], i=0, j=0, klm=0, z;
#836   for (l=0; l<HASHSTATE; ++l)
#837     e[l]=f[l]=g[l]=h[l]=x[l]=y[l]=~((uint32_t)0);
#844     for (l=0; l<hlen+1; ++l) {a[l] = b[l] = (uint8_t)0;}
#853     for (l=0; l<HASHSTATE; ++l)
#855       e[l] &= (c[l]^d[l]);
#856       f[l] &= ~(c[l]^d[l]);
#857       g[l] &= c[l];
#858       h[l] &= ~c[l];
#859       x[l] &= d[l];
#860       y[l] &= ~d[l];
#861       if (e[l]|f[l]|g[l]|h[l]|x[l]|y[l]) finished=0;
nc4attr.c#264     for (var = grp->varvarvar = var->l.next)
#274   for (att = *attlistattatt = att->l.next)
#356   if (att->l.prev)
#357      att->attnum = ((NC_ATT_INFO_T *)att->l.prev)->attnum + 1;
#669      for (var = grp->varvarvar = var->l.next)
#678   for (att = listattatt = att->l.next)
#685   for (att = listattatt = att->l.next)
#780      for(var = grp->varvarvar = var->l.next)
#795   for (att = *attlistattatt = att->l.next)
#813   for (natt = att->l.nextnattnatt = natt->l.next)
nc4dim.c#41      for (dim = g->dimdimdim = dim->l.next)
#86  for (dim = grp->dimdimdim = dim->l.next)
#113   for (dim = grp->dimdimdim = dim->l.next)
#168      for (dim = g->dimdimdim = dim->l.next)
#271   for (dim = grp->dimdimdim = dim->l.next)
#365      for (dim=grp->dimdimdim=dim->l.next)
nc4file.c#2697  for (dim = grp->dimdimdim = dim->l.next)
#3223      for (dim = grp->dimdimdim = dim->l.next)
#3229      for (var = grp->varvarvarvar->l.next)
#3235      for (att = grp->attattatt = att->l.next)
#3248      for (dim = grp->dimdimdim = dim->l.next)
nc4grp.c#157   for (g = grp->childrengg = g->l.next)
#194   for (g = grp->childrengg = g->l.next)
#418  for (var = grp->varvarvar = var->l.next)
#476      for (dim = grp->dimdimdim = dim->l.next)
#480     for (dim = g->dimdimdim = dim->l.next)
#489  for (dim = grp->dimdimdim = dim->l.next)
#495        for (dim = g->dimdimdim = dim->l.next)
nc4hdf.c#53  for(att = *attlistattatt = att->l.next) {
#79  for (child_grp = grp->childrenchild_grpchild_grp = child_grp->l.next)
#84  for (var = grp->varvarvar = var->l.next)
#119  for (child_grp = grp->childrenchild_grpchild_grp = child_grp->l.next)
#124  for (var = grp->varvarvar = var->l.next)
#149  for (var = grp->varvarvar = var->l.next)
#1423  for (att = attlistattatt = att->l.next)
#1855      for (field = type->u.c.fieldfieldfield = field->l.next)
#1924      for (enum_m = type->u.e.enum_memberenum_menum_m = enum_m->l.next)
#2062  for (var = grp->varvarvar = var->l.next)
#2178      for (d1 = grp->dimd1d1 = d1->l.next)
#2206      for (d1 = grp->dimd1d1 = d1->l.next)
#2442      for (v1 = grp->varv1v1 = v1->l.next)
#2498  for (var = grp->varvarvar = var->l.next)
#2538  for (child_grp = grp->childrenchild_grpchild_grp = child_grp->l.next)
#2578      for (found_coord = NC_FALSEdim && !found_coorddim = dim->l.next)
#2594      for (wrote_coord = NC_FALSEvar && !wrote_coordvar = var->l.next)
#2607  for (child_grp = grp->childrenchild_grpchild_grp = child_grp->l.next)
#2637  for (type = grp->typetypetype = type->l.next)
#2642  for (child_grp = grp->childrenchild_grpchild_grp = child_grp->l.next)
#3638  for (g = grp->childrengg = g->l.next)
#3644  for (var = grp->varvarvar = var->l.next)
#3674                      for (dim = g->dimdimdim = dim->l.next)
#3752                  for (dim = grp->dimdimdim = dim->l.next)
nc4internal.c#124   for (var = grp->varvarvar = var->l.next)
#308      for (g = start_grp->childrengg = g->l.next)
#334   for ((*var) = (*grp)->var; (*var); (*var) = (*var)->l.next)
#355      for ((*dim) = g->dim; (*dim); (*dim) = (*dim)->l.next)
#381   for ((*var) = grp->var; (*var); (*var) = (*var)->l.next)
#399   for (type = start_grp->typetypetype = type->l.next)
#409      for (g = start_grp->childrengg = g->l.next)
#427   for (type = start_grp->typetypetype = type->l.next)
#433      for (g = start_grp->childrengg = g->l.next)
#450   for (type = start_grp->typetypetype = type->l.next)
#459      for (g = start_grp->childrengg = g->l.next)
#507   for (g = grp->childrengg = g->l.next)
#513   for (var = grp->varvarvar = var->l.next)
#544      for(var = grp->varvarvar = var->l.next)
#559       for (*att = attlist; *att; *att = (*att)->l.next) {
#595      for(var = grp->varvarvar = var->l.next)
#608   for (*att = attlist; *att; *att = (*att)->l.next)
#782   for (type = grp->typetypetype = type->l.next)
#787   for (g = grp->childrengg = g->l.next)
#793   for (var = grp->varvarvar = var->l.next)
#961                  NC_FIELD_INFO_T *f = field->l.next;
#977                  NC_ENUM_MEMBER_INFO_T *em = enum_member->l.next;
#1022      a = att->l.next;
#1143      c = g->l.next;
#1155      a = att->l.next;
#1170      v = var->l.next;
#1184      d = dim->l.next;
#1195      t = type->l.next;
#1330               for (dim1 = g->dimdim1 && !finisheddim1 = dim1->l.next)
#1471   for(att = grp->attattatt = att->l.next)
#1475   for(dim = grp->dimdimdim = dim->l.next)
#1479   for(var = grp->varvarvar = var->l.next)
#1494      for(att = var->attattatt = att->l.next)
#1504   for (type = grp->typetypetype = type->l.next)
#1514  for (field = type->u.c.fieldfieldfield = field->l.next)
#1540      for (g = grp->childrengg = g->l.next)
nc4internal.h#118   NC_LIST_NODE_T l;            /* Use generic doubly-linked list (must be first) */
#133   NC_LIST_NODE_T l;            /* Use generic doubly-linked list (must be first) */
#149   NC_LIST_NODE_T l;            /* Use generic doubly-linked list (must be first) */
#196   NC_LIST_NODE_T l;            /* Use generic doubly-linked list (must be first) */
#209   NC_LIST_NODE_T l;            /* Use generic doubly-linked list (must be first) */
#216   NC_LIST_NODE_T l;            /* Use generic doubly-linked list (must be first) */
#269   NC_LIST_NODE_T l;            /* Use generic doubly-linked list (must be first) */
nc4type.c#125      for (type = grptwo->typetypetype = type->l.next)
#168      for (type = grp->typetypetype = type->l.next)
#454   for (field = type->u.c.fieldfieldfield = field->l.next)
#521   for (field = type->u.c.fieldfieldfield = field->l.next)
#627  enum_member = enum_member->l.next;
#670      enum_member = enum_member->l.next;
nc4var.c#97   for (var = grp->varvarvar = var->l.next)
#160   for (var = grp->varvarvar = var->l.next)
#570   for (dim = grp->dimdimdim = dim->l.next)
#666         for (att = grp->attattatt = att->l.next)
#674   for (var = grp->varvarvar = var->l.next)
#694      for (att = var->attattatt = att->l.next)
#824   for (var = grp->varvarvar = var->l.next)
#1151   for (var = grp->varvarvar = var->l.next)
#1200   for (var = grp->varvarvar = var->l.next)
#1296   for (var = grp->varvarvar = var->l.next)
nclist.c#23  NClistl;
#30  l = (NClist*)malloc(sizeof(NClist));
#31  if(l) {
#32    l->alloc=0;
#33    l->length=0;
#34    l->content=NULL;
#36  return l;
#40nclistfree(NClistl)
#42  if(l) {
#43    l->alloc = 0;
#44    if(l->content != NULL) {free(l->content); l->content = NULL;}
#45    free(l);
#51nclistsetalloc(NClistl, unsigned long sz)
#54  if(l == NULL) return FALSE;
#55  if(sz <= 0) {sz = (l->length?2*l->length:DEFAULTALLOC);}
#56  if(l->alloc >= sz) {return TRUE;}
#58  if(newcontent != NULL && l->alloc > 0 && l->length > 0 && l->content != NULL) {
#59    memcpy((void*)newcontent,(void*)l->content,sizeof(void*)*l->length);
#61  if(l->content != NULL) free(l->content);
#62  l->content=newcontent;
#63  l->alloc=sz;
#68nclistsetlength(NClistl, unsigned long sz)
#70  if(l == NULL) return FALSE;
#71  if(sz > l->alloc && !nclistsetalloc(l,sz)) return FALSE;
#72  l->length = sz;
#77nclistget(NClistl, unsigned long index)
#79  if(l == NULL || l->length == 0) return NULL;
#80  if(index >= l->length) return NULL;
#81  return l->content[index];
#85nclistset(NClistl, unsigned long index, void* elem)
#87  if(l == NULL) return FALSE;
#88  if(index >= l->length) return FALSE;
#89  l->content[index] = elem;
#95nclistinsert(NClistl, unsigned long index, void* elem)
#98  if(l == NULL) return FALSE;
#99  if(index > l->length) return FALSE;
#100  nclistsetalloc(l,0);
#101  for(i=(int)l->length;i>index;i--) l->content[i] = l->content[i-1];
#102  l->content[index] = elem;
#103  l->length++;
#108nclistpush(NClistl, void* elem)
#110  if(l == NULL) return FALSE;
#111  if(l->length >= l->allocnclistsetalloc(l,0);
#112  l->content[l->length] = elem;
#113  l->length++;
#118nclistpop(NClistl)
#120  if(l == NULL || l->length == 0) return NULL;
#121  l->length--;
#122  return l->content[l->length];
#126nclisttop(NClistl)
#128  if(l == NULL || l->length == 0) return NULL;
#129  return l->content[l->length - 1];
#133nclistremove(NClistl, unsigned long i)
#137  if(l == NULL || (len=l->length) == 0) return NULL;
#139  elem = l->content[i];
#140  for(i+=1;i<len;i++) l->content[i-1] = l->content[i];
#141  l->length--;
#147nclistdup(NClistl)
#149    void** result = (void**)malloc(sizeof(void*)*(l->length+1));
#150    memcpy((void*)result,(void*)l->content,sizeof(void*)*l->length);
#151    result[l->length] = (void*)0;
#156nclistcontains(NClistl, void* elem)
#159    for(i=0;i<nclistlength(l);i++) {
#160 if(elem == nclistget(l,i)) return 1;
#167nclistelemremove(NClistl, void* elem)
#172  if(l == NULL || (len=l->length) == 0) return 0;
#173  for(i=0;i<nclistlength(l);i++) {
#174    void* candidate = l->content[i];
#176      for(i+=1;i<len;i++) l->content[i-1] = l->content[i];
#177      l->length--;
#194nclistunique(NClistl)
#198    if(l == NULL || l->length == 0) return 1;
#199    len = l->length;
#200    content = l->content;
#210    l->length = len;
#215nclistclone(NClistl)
#218    *clone = *l;
#219    clone->content = nclistdup(l);
nclist.h#34EXTERNC void* nclistremove(NClistl, unsigned long i);
#48EXTERNC int nclistelemremove(NClistl, void* elem);
#57#define nclistclear(lnclistsetlength((l),0)
#58#define nclistextend(l,lennclistsetalloc((l),(len)+(l->alloc))
#59#define nclistcontents(l)  ((l)==NULL?NULL:(l)->content)
#60#define nclistlength(l)  ((l)==NULL?0:(l)->length)
occurlfunctions.c#33    long l = (long)value;
#35    if(l <= 1000) {
#36 OCDBG2("%s=%ld",name,l);
oclist.c#23  OClistl;
#30  l = (OClist*)malloc(sizeof(OClist));
#31  if(l) {
#32    l->alloc=0;
#33    l->length=0;
#34    l->content=NULL;
#36  return l;
#40oclistfree(OClistl)
#42  if(l) {
#43    l->alloc = 0;
#44    if(l->content != NULL) {free(l->content); l->content = NULL;}
#45    free(l);
#51oclistsetalloc(OClistl, size_t sz)
#54  if(l == NULL) return FALSE;
#55  if(sz <= 0) {sz = (l->length?2*l->length:DEFAULTALLOC);}
#56  if(l->alloc >= sz) {return TRUE;}
#58  if(newcontent != NULL && l->alloc > 0 && l->length > 0 && l->content != NULL) {
#59    memcpy((void*)newcontent,(void*)l->content,sizeof(void*)*l->length);
#61  if(l->content != NULL) free(l->content);
#62  l->content=newcontent;
#63  l->alloc=sz;
#68oclistsetlength(OClistl, size_t sz)
#70  if(l == NULL) return FALSE;
#71  if(sz > l->alloc && !oclistsetalloc(l,sz)) return FALSE;
#72  l->length = sz;
#77oclistget(OClistl, size_t index)
#79  if(l == NULL || l->length == 0) return NULL;
#80  if(index >= l->length) return NULL;
#81  return l->content[index];
#85oclistset(OClistl, size_t index, void* elem)
#87  if(l == NULL) return FALSE;
#88  if(index >= l->length) return FALSE;
#89  l->content[index] = elem;
#95oclistinsert(OClistl, size_t index, void* elem)
#98  if(l == NULL) return FALSE;
#99  if(index > l->length) return FALSE;
#100  oclistsetalloc(l,0);
#101  for(i=(int)l->length;i>index;i--) l->content[i] = l->content[i-1];
#102  l->content[index] = elem;
#103  l->length++;
#108oclistpush(OClistl, void* elem)
#110  if(l == NULL) return FALSE;
#111  if(l->length >= l->allococlistsetalloc(l,0);
#112  l->content[l->length] = elem;
#113  l->length++;
#118oclistpop(OClistl)
#120  if(l == NULL || l->length == 0) return NULL;
#121  l->length--;
#122  return l->content[l->length];
#126oclisttop(OClistl)
#128  if(l == NULL || l->length == 0) return NULL;
#129  return l->content[l->length - 1];
#133oclistremove(OClistl, size_t i)
#137  if(l == NULL || (len=l->length) == 0) return NULL;
#139  elem = l->content[i];
#140  for(i+=1;i<len;i++) l->content[i-1] = l->content[i];
#141  l->length--;
#147oclistdup(OClistl)
#149    void** result = (void**)malloc(sizeof(void*)*(l->length+1));
#151 if(l != NULL && oclistlength(l) != 0)
#152            memcpy((void*)result,(void*)l->content,sizeof(void*)*l->length);
#153        result[l->length] = (void*)0;
#159oclistcontains(OClistl, void* elem)
#162    for(i=0;i<oclistlength(l);i++) {
#163 if(elem == oclistget(l,i)) return 1;
#170oclistelemremove(OClistl, void* elem)
#175  if(l == NULL || (len=l->length) == 0) return 0;
#176  for(i=0;i<oclistlength(l);i++) {
#177    void* candidate = l->content[i];
#179      for(i+=1;i<len;i++) l->content[i-1] = l->content[i];
#180      l->length--;
#197oclistunique(OClistl)
#201    if(l == NULL || l->length == 0) return 1;
#202    len = l->length;
#203    content = l->content;
#213    l->length = len;
#218oclistclone(OClistl)
#221    *clone = *l;
#222    clone->content = oclistdup(l);
oclist.h#34EXTERNC void* oclistremove(OClistl, size_t i);
#48EXTERNC int oclistelemremove(OClistl, void* elem);
#57#define oclistclear(loclistsetlength((l),0)
#58#define oclistextend(l,lenoclistsetalloc((l),(len)+(l->alloc))
#59#define oclistcontents(l)  ((l)==NULL?NULL:(l)->content)
#60#define oclistlength(l)  ((l)==NULL?0:(l)->length)
tst_dims.c#853      int ijkl;
#859        for (l = 0; l <TIME_LENl++)
#860   pres[i][j][k][l] = 1013.1 + j;
#865     for (l = 0; l <TIME_LENl++)
#866        hp[i][j][l] = 100 + l;
#997        for (l = 0; l <TIME_LENl++)
#998   if (0 != pres_in[i][j][k][l]) ERR;
#1010     for (l = 0; l <TIME_LENl++)
#1011        if (0 != hp_in[i][j][l]) ERR;
#1031        for (l = 0; l <TIME_LENl++)
#1032   if (pres[i][j][k][l] != pres_in[i][j][k][l]) ERR;
#1044     for (l = 0; l <TIME_LENl++)
#1045        if (hp[i][j][l] != hp_in[i][j][l]) ERR;


HyperKWIC - Version 7.20DA executed at 11:37 on 27 Oct 2017 | Polyhedron Solutions - INTERNAL USE | COMMERCIAL (Any O/S) SN 4AKIed