Преглед изворни кода

closing the file when finished writing

Luka Stanisic пре 9 година
родитељ
комит
c0a665004a
1 измењених фајлова са 3 додато и 0 уклоњено
  1. 3 0
      src/core/perfmodel/multiple_regression.c

+ 3 - 0
src/core/perfmodel/multiple_regression.c

@@ -70,6 +70,9 @@ static void dump_multiple_regression_list(double *mx, double *my, unsigned ncoef
 		ptr = ptr->next;
 		i++;
 	}
+
+	if (PRINT)
+		fclose(f);
 }
 
 static long find_long_list_size(struct starpu_perfmodel_history_list *list_history)