/[escript]/branches/domexper/dudley/src/Mesh_saveVTK.c
ViewVC logotype

Diff of /branches/domexper/dudley/src/Mesh_saveVTK.c

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

revision 1741 by gross, Mon Sep 1 04:06:41 2008 UTC revision 1743 by ksteube, Tue Sep 2 00:54:05 2008 UTC
# Line 496  void Finley_Mesh_saveVTK(const char * fi Line 496  void Finley_Mesh_saveVTK(const char * fi
496        
497           }           }
498           #ifdef PASO_MPI           #ifdef PASO_MPI
499                if (txt_buffer_in_use==0) { strcpy(txt_buffer, " "); txt_buffer_in_use = 1; } /* avoid zero-length writes */
500              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);
501           #endif               #endif    
502        } else {        } else {
# Line 696  void Finley_Mesh_saveVTK(const char * fi Line 697  void Finley_Mesh_saveVTK(const char * fi
697             }             }
698          }          }
699          #ifdef PASO_MPI          #ifdef PASO_MPI
700               if (txt_buffer_in_use==0) { strcpy(txt_buffer, " "); txt_buffer_in_use = 1; } /* avoid zero-length writes */
701             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);
702          #endif              #endif    
703       } else {       } else {
# Line 849  void Finley_Mesh_saveVTK(const char * fi Line 851  void Finley_Mesh_saveVTK(const char * fi
851              __STRCAT(txt_buffer,tmp_buffer,txt_buffer_in_use);              __STRCAT(txt_buffer,tmp_buffer,txt_buffer_in_use);
852           }           }
853           #ifdef PASO_MPI           #ifdef PASO_MPI
854                if (txt_buffer_in_use==0) { strcpy(txt_buffer, " "); txt_buffer_in_use = 1; } /* avoid zero-length writes */
855              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);
856           #endif               #endif    
857       } else {       } else {
# Line 875  void Finley_Mesh_saveVTK(const char * fi Line 878  void Finley_Mesh_saveVTK(const char * fi
878          txt_buffer_in_use=0;          txt_buffer_in_use=0;
879          for (i=0; i<numCells*numCellFactor; i++) __STRCAT(txt_buffer,tmp_buffer,txt_buffer_in_use);          for (i=0; i<numCells*numCellFactor; i++) __STRCAT(txt_buffer,tmp_buffer,txt_buffer_in_use);
880           #ifdef PASO_MPI           #ifdef PASO_MPI
881                if (txt_buffer_in_use==0) { strcpy(txt_buffer, " "); txt_buffer_in_use = 1; } /* avoid zero-length writes */
882              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);
883           #endif               #endif    
884       } else {       } else {
# Line 1090  void Finley_Mesh_saveVTK(const char * fi Line 1094  void Finley_Mesh_saveVTK(const char * fi
1094                 }                 }
1095                 if ( mpi_size > 1) {                 if ( mpi_size > 1) {
1096                       #ifdef PASO_MPI                       #ifdef PASO_MPI
1097                            if (txt_buffer_in_use==0) { strcpy(txt_buffer, " "); txt_buffer_in_use = 1; } /* avoid zero-length writes */
1098                          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);
1099                       #endif                           #endif    
1100                       if ( my_mpi_rank == 0) {                       if ( my_mpi_rank == 0) {
# Line 1255  void Finley_Mesh_saveVTK(const char * fi Line 1260  void Finley_Mesh_saveVTK(const char * fi
1260                 }                 }
1261                 if ( mpi_size > 1) {                 if ( mpi_size > 1) {
1262                     #ifdef PASO_MPI                     #ifdef PASO_MPI
1263                         if (txt_buffer_in_use==0) { strcpy(txt_buffer, " "); txt_buffer_in_use = 1; } /* avoid zero-length writes */
1264                       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);
1265                     #endif                         #endif    
1266                     if ( my_mpi_rank == 0) {                     if ( my_mpi_rank == 0) {

Legend:
Removed from v.1741  
changed lines
  Added in v.1743

  ViewVC Help
Powered by ViewVC 1.1.26