Use plain old C types.

git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/simgrid/simgrid/trunk@8791 48e7efb5-ca39-0410-a469-dd3cf9ba447f

diff --git a/include/smpi/smpif.h.in b/include/smpi/smpif.h.in
index b8d3ccd..c003a43 100644 (file)
--- a/include/smpi/smpif.h.in
+++ b/include/smpi/smpif.h.in
@@ -18,7 +18,7 @@
 #include <xbt/misc.h>
 
 XBT_PUBLIC(int) smpi_process_argc(void);
-XBT_PUBLIC(int) smpi_process_getarg(integer* index, char* dst, ftnlen len);
+XBT_PUBLIC(int) smpi_process_getarg(int* index, char* dst, size_t len);
 XBT_PUBLIC(int) smpi_global_rank(void);
 XBT_PUBLIC(int) smpi_global_size(void);
 

diff --git a/src/smpi/smpi_global.c b/src/smpi/smpi_global.c
index 99aca73..3e0d59a 100644 (file)
--- a/src/smpi/smpi_global.c
+++ b/src/smpi/smpi_global.c
@@ -68,7 +68,7 @@ int smpi_process_argc(void) {
   return data->argc ? *(data->argc) - 1 : 0;
 }
 
-int smpi_process_getarg(integer* index, char* dst, ftnlen len) {
+int smpi_process_getarg(int* index, char* dst, size_t len) {
   smpi_process_data_t data = smpi_process_data();
   char* arg;
   size_t i;