mirror/netcdf-c
2
0
Fork 0
mirror of https://github.com/Unidata/netcdf-c.git synced 2025-03-01 17:06:03 +08:00
Code Issues Packages Projects Releases Wiki Activity

update oc2

Browse Source
This commit is contained in:
Dennis Heimbigner 2012-08-12 17:51:01 +00:00
parent be5a7bbe71
commit d131258014
2 changed files with 9 additions and 12 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

19
oc2/oclist.c
View File

@ -6,10 +6,7 @@
#include "oclist.h"
static ocelem ocDATANULL = (ocelem)0;
/*static int ocinitialized=0;*/
int oclistnull(ocelem e) {return e == ocDATANULL;}
int oclistnull(ocelem e) {return e == NULL;}
#ifndef TRUE
#define TRUE 1
@ -79,8 +76,8 @@ oclistsetlength(OClist* l, unsigned int sz)
ocelem
oclistget(OClist* l, unsigned int index)
{
if(l == NULL || l->length == 0) return ocDATANULL;
if(index >= l->length) return ocDATANULL;
if(l == NULL || l->length == 0) return NULL;
if(index >= l->length) return NULL;
return l->content[index];
}
@ -120,7 +117,7 @@ oclistpush(OClist* l, ocelem elem)
ocelem
oclistpop(OClist* l)
{
if(l == NULL || l->length == 0) return ocDATANULL;
if(l == NULL || l->length == 0) return NULL;
l->length--;
return l->content[l->length];
}
@ -128,7 +125,7 @@ oclistpop(OClist* l)
ocelem
oclisttop(OClist* l)
{
if(l == NULL || l->length == 0) return ocDATANULL;
if(l == NULL || l->length == 0) return NULL;
return l->content[l->length - 1];
}
@ -137,8 +134,8 @@ oclistremove(OClist* l, unsigned int i)
{
unsigned int len;
ocelem elem;
if(l == NULL || (len=l->length) == 0) return ocDATANULL;
if(i >= len) return ocDATANULL;
if(l == NULL || (len=l->length) == 0) return NULL;
if(i >= len) return NULL;
elem = l->content[i];
for(i+=1;i<len;i++) l->content[i-1] = l->content[i];
l->length--;
@ -172,7 +169,7 @@ oclistelemremove(OClist* l, ocelem elem)
unsigned int len;
unsigned int i;
int found = 0;
if(l == NULL || (len=l->length) == 0) return ocDATANULL;
if(l == NULL || (len=l->length) == 0) return 0;
for(i=0;i<oclistlength(l);i++) {
ocelem candidate = l->content[i];
if(elem == candidate) {

2
oc2/oclist.h
View File

@ -11,7 +11,7 @@
#define EXTERNC extern
#endif
typedef unsigned long ocelem;
typedef void* ocelem;
EXTERNC int oclistnull(ocelem);