Index: /issm/trunk-jpl/src/c/classes/IoModel.cpp
===================================================================
--- /issm/trunk-jpl/src/c/classes/IoModel.cpp	(revision 16500)
+++ /issm/trunk-jpl/src/c/classes/IoModel.cpp	(revision 16501)
@@ -1081,9 +1081,5 @@
 void  IoModel::FetchMultipleData(char*** pstrings,int* pnumstrings,int data_enum){
 
-	int my_rank;
-
-	int i;
-	int num_instances;
-	int* codes=NULL;
+	int  num_instances;
 
 	/*output: */
@@ -1094,9 +1090,10 @@
 	char   *string         = NULL;
 	int     string_size;
+	int    *codes          = NULL;
 	int    *code           = NULL;
 	fpos_t *file_positions = NULL;
 
 	/*recover my_rank:*/
-	my_rank=IssmComm::GetRank();
+	int my_rank=IssmComm::GetRank();
 
 	/*Get file pointers to beginning of the data (multiple instances of it): */
@@ -1106,5 +1103,5 @@
 		strings=xNew<char*>(num_instances);
 
-		for(i=0;i<num_instances;i++){
+		for(int i=0;i<num_instances;i++){
 
 			if(my_rank==0){
@@ -1139,4 +1136,5 @@
 	/*Free ressources:*/
 	xDelete<int>(codes);
+	xDelete<fpos_t>(file_positions);
 	
 	/*Assign output pointers: */
@@ -1148,6 +1146,5 @@
 void  IoModel::FetchMultipleData(IssmDouble*** pmatrices,int** pmdims,int** pndims, int* pnumrecords,int data_enum){
 
-	int i;
-	int num_instances;
+	int     num_instances;
 	fpos_t* file_positions=NULL;
 
@@ -1231,4 +1228,5 @@
 			
 	/*Free ressources:*/
+	xDelete<fpos_t>(file_positions);
 	xDelete<int>(codes);