SWZ: adding missing fclose()

2010-07-30 23:08:00 +02:00 · 2010-07-30 23:08:00 +02:00 · 15bd597f75
parent 6b8dd7b89b
commit 15bd597f75
1 changed files with 2 additions and 1 deletions
--- a/matlab/swz/swz_write_mhm_input.m
+++ b/matlab/swz/swz_write_mhm_input.m
@ -36,4 +36,5 @@ function swz_write_mhm_input(fname,options_ms)
    fprintf(fh,'//== scale values for Dirichlet distribution ==//\n');
    fprintf(fh,'3\n\n');
    fprintf(fh,'%f ',options_ms.dirichlet_scale);
-    fprintf(fh,'\n');
+    fprintf(fh,'\n');
+    fclose(fh);