Remove some unused variables

Author: ZedThree

libdap2/cdf.c

@@ -16,8 +16,8 @@ extern char* ocfqn(OCddsnode);
 static NCerror sequencecheckr(CDFnode* node, NClist* vars, CDFnode* topseq);
 static NCerror restructr(NCDAPCOMMON*, CDFnode*, CDFnode*, NClist*);
 static NCerror repairgrids(NCDAPCOMMON*, NClist*);
-static NCerror structwrap(NCDAPCOMMON*, CDFnode*, CDFnode*, int, CDFnode*, int);
-static int findin(CDFnode* parent, CDFnode* child);
+static NCerror structwrap(NCDAPCOMMON*, CDFnode*, CDFnode*, size_t, CDFnode*);
+static size_t findin(CDFnode* parent, CDFnode* child);
 static CDFnode* makenewstruct(NCDAPCOMMON*, CDFnode*, CDFnode*);
 static NCerror mapnodesr(CDFnode*, CDFnode*, int depth);
 static NCerror mapfcn(CDFnode* dstnode, CDFnode* srcnode);
@@ -507,10 +507,9 @@ repairgrids(NCDAPCOMMON* ncc, NClist* repairlist)
     for(i=0;i<nclistlength(repairlist);i+=2) {
 	CDFnode* node = (CDFnode*)nclistget(repairlist,i);
 	CDFnode* pattern = (CDFnode*)nclistget(repairlist,i+1);
-	int tindex = findin(pattern->container,pattern);
 	size_t index = findin(node->container,node);
 	ncstat = structwrap(ncc, node,node->container,index,
-                             pattern->container,tindex);
+                             pattern->container);
 #ifdef DEBUG
 fprintf(stderr,"repairgrids: %s -> %s\n",
 ocfqn(node->ocnode),ocfqn(pattern->ocnode));
@@ -521,8 +520,8 @@ ocfqn(node->ocnode),ocfqn(pattern->ocnode));
 }
 
 static NCerror
-structwrap(NCDAPCOMMON* ncc, CDFnode* node, CDFnode* parent, int parentindex,
-                           CDFnode* patterngrid, int gridindex)
+structwrap(NCDAPCOMMON* ncc, CDFnode* node, CDFnode* parent, size_t parentindex,
+                           CDFnode* patterngrid)
 {
     CDFnode* newstruct;
 

libdap2/constraints.c

@@ -700,13 +700,11 @@ dapvar2projection(CDFnode* var, DCEprojection** projectionp)
     NClist* path = nclistnew();
     NClist* segments;
     DCEprojection* projection = NULL;
-    int dimindex;
 
     /* Collect the nodes needed to construct the projection segments */
     collectnodepath(var,path,!WITHDATASET);
 
     segments = nclistnew();
-    dimindex = 0; /* point to next subset of slices */
     nclistsetalloc(segments,nclistlength(path));
     for(i=0;i<nclistlength(path);i++) {
 	DCEsegment* segment = (DCEsegment*)dcecreate(CES_SEGMENT);
@@ -730,7 +728,6 @@ dapvar2projection(CDFnode* var, DCEprojection** projectionp)
 	}
 	segment->slicesdefined = 1;
 	segment->slicesdeclized = 1;
-	dimindex += localrank;
 	nclistpush(segments,(void*)segment);
     }