/[escript]/trunk/finley/src/Mesh_saveVTK.c
ViewVC logotype

Diff of /trunk/finley/src/Mesh_saveVTK.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1571 by gross, Wed May 21 13:04:40 2008 UTC revision 1572 by gross, Mon May 26 12:50:56 2008 UTC
# Line 128  void Finley_Mesh_saveVTK(const char * fi Line 128  void Finley_Mesh_saveVTK(const char * fi
128              /*   MPI_Info_set(mpi_info, "direct_write",          "true"); */              /*   MPI_Info_set(mpi_info, "direct_write",          "true"); */
129            #endif            #endif
130            ierr=MPI_File_open(mesh_p->Nodes->MPIInfo->comm, (char*)filename_p, amode,mpi_info, &mpi_fileHandle_p);            ierr=MPI_File_open(mesh_p->Nodes->MPIInfo->comm, (char*)filename_p, amode,mpi_info, &mpi_fileHandle_p);
 printf("MPI_File_open ierr= %d\n",ierr);  
131            if (ierr != MPI_SUCCESS) {            if (ierr != MPI_SUCCESS) {
132            perror(filename_p);            perror(filename_p);
133                sprintf(error_msg, "saveVTK: File %s could not be opened for writing in parallel.", filename_p);                sprintf(error_msg, "saveVTK: File %s could not be opened for writing in parallel.", filename_p);
# Line 454  printf("MPI_File_open ierr= %d\n",ierr); Line 453  printf("MPI_File_open ierr= %d\n",ierr);
453              }                  }    
454        
455           }           }
 printf("%d %d\n",strlen(txt_buffer),len_txt_buffer+1); ;fflush(stdout);  
 printf("%s\n",txt_buffer); ;fflush(stdout);  
456           #ifdef PASO_MPI           #ifdef PASO_MPI
457              MPI_File_write_ordered(mpi_fileHandle_p, txt_buffer,txt_buffer_in_use, MPI_CHAR, &mpi_status);              MPI_File_write_ordered(mpi_fileHandle_p, txt_buffer,txt_buffer_in_use, MPI_CHAR, &mpi_status);
458           #endif               #endif    
Legend:
Removed from v.1571  
changed lines
  Added in v.1572
  ViewVC Help
Powered by ViewVC 1.1.26