/[escript]/trunk/paso/src/Paso_MPI.c
ViewVC logotype

Diff of /trunk/paso/src/Paso_MPI.c

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

revision 1312 by ksteube, Mon Sep 24 06:18:44 2007 UTC revision 1343 by ksteube, Wed Nov 14 02:48:02 2007 UTC
# Line 15  Line 15 
15    
16  #include <stdlib.h>  #include <stdlib.h>
17  #include <stdio.h>  #include <stdio.h>
18    #include <string.h>
19    
20    
21  #include "Paso_MPI.h"  #include "Paso_MPI.h"
# Line 158  int Paso_MPIInfo_initialized( void ) Line 159  int Paso_MPIInfo_initialized( void )
159       return TRUE;       return TRUE;
160    #endif    #endif
161  }  }
162    
163    /* Append MPI rank to file name if multiple MPI processes */
164    char *Paso_MPI_appendRankToFileName(char *fileName, int mpi_size, int mpi_rank) {
165      char newFileName[4096];
166      strncpy(newFileName, fileName, strlen(fileName)+1);
167      if (mpi_size>1) sprintf(newFileName+strlen(newFileName), ".%04d", mpi_rank);
168      return(newFileName);
169    }
170    

Legend:
Removed from v.1312  
changed lines
  Added in v.1343

  ViewVC Help
Powered by ViewVC 1.1.26