fix initialization of var rec_var

jedwards4b · Jul 24, 2020 · f6ad7c5 · f6ad7c5
1 parent 2bd7f60
commit f6ad7c5
Showing 1 changed file with 5 additions and 1 deletion.
diff --git a/src/clib/pioc_support.c b/src/clib/pioc_support.c
@@ -2412,8 +2412,10 @@ inq_file_metadata(file_desc_t *file, int ncid, int iotype, int *nvars,
                 /* Only first dim may be unlimited, for PIO. */
                 if (unlim_found)
                 {
-                    if (d == 0)
+                    if (d == 0){
                         (*rec_var)[v] = 1;
+			break;
+		    }
                     else
                         return pio_err(NULL, file, PIO_EINVAL, __FILE__, __LINE__);
 
@@ -2422,7 +2424,9 @@ inq_file_metadata(file_desc_t *file, int ncid, int iotype, int *nvars,
                     (*rec_var)[v] = 0;
 
             }
+	    PLOG((2,"varid %d var_ndims %d nunlimdims %d rec_var %d unlimdimids[0]=%d var_dimids[0]=%d\n",v,var_ndims, nunlimdims, (*rec_var)[v], unlimdimids[0], var_dimids[0]));
         }
+
     } /* next var */
 
     /* Free resources. */