1 #ifndef PHSOLVER_PHIO_H 2 #define PHSOLVER_PHIO_H 3 4 #include <FCMangle.h> 5 6 #define phio_readheader FortranCInterface_GLOBAL_(phio_readheader, PHIO_READHEADER) 7 #define phio_readdatablock FortranCInterface_GLOBAL_(phio_readdatablock, PHIO_READDATABLOCK) 8 #define phio_openfile FortranCInterface_GLOBAL_(phio_openfile, PHIO_OPENFILE) 9 #define phio_restartname FortranCInterface_GLOBAL_(phio_restartname, PHIO_RESTARTNAME) 10 11 #ifdef __cplusplus 12 extern "C" { 13 #endif 14 void phio_readheader( 15 int* fileDescriptor, 16 const char keyphrase[], 17 void* valueArray, 18 int* nItems, 19 const char datatype[], 20 const char iotype[] ); 21 void phio_readdatablock( 22 int* fileDescriptor, 23 const char keyphrase[], 24 void* valueArray, 25 int* nItems, 26 const char datatype[], 27 const char iotype[] ); 28 void phio_openfile(const char filename[], 29 const char mode[], 30 int* numFiles, 31 int* fileDescriptor); 32 void phio_restartname(int* step, char* filename); 33 #ifdef __cplusplus 34 } 35 #endif 36 37 #endif 38 39