Changeset 6396

Timestamp:

10/22/10 08:50:16 (15 years ago)

Author:

Mathieu Morlighem

Message:

Fixed serial

File:

• issm/trunk/src/c/modules/OutputResultsx/OutputResultsx.cpp (modified) (3 diffs)

issm/trunk/src/c/modules/OutputResultsx/OutputResultsx.cpp

@@ -55 +55 @@
                 parameters->FindParam(&outputfilename,OutputFileNameEnum);
 
-
                 /*What strategy? : */
                 parameters->FindParam(&io_gather,IoGatherEnum);
@@ -68 +67 @@
                         fid=pfopen(cpu_outputfilename ,"wb");
                 }
+                xfree((void**)&outputfilename);
                 
                 /*Add file pointer in parameters for further calls to OutputResultsx: */
@@ -86 +86 @@
         #ifdef _PARALLEL_
                 delete results; results=new Results();
+
+                /*Close output file? :*/
+                if((step==1) && (time==0)){
+                        if(io_gather){
+                                if(my_rank==0) pfclose(fid,outputfilename);
+                        }
+                        else pfclose(fid,cpu_outputfilename);
+                }
         #endif
-
-        /*Close output file? :*/
-        if((step==1) && (time==0)){
-                if(io_gather){
-                        if(my_rank==0) pfclose(fid,outputfilename);
-                }
-                else pfclose(fid,cpu_outputfilename);
-        }
 
         /*Assign output pointers:*/