From 822acfadcfb2a034c9cdaf4131d233ef0f8c2235 Mon Sep 17 00:00:00 2001 From: pini Date: Wed, 1 Dec 2010 08:52:20 +0000 Subject: [PATCH] Use plain old C types. git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/simgrid/simgrid/trunk@8791 48e7efb5-ca39-0410-a469-dd3cf9ba447f --- include/smpi/smpif.h.in | 2 +- src/smpi/smpi_global.c | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/include/smpi/smpif.h.in b/include/smpi/smpif.h.in index b8d3ccdf84..c003a43822 100644 --- a/include/smpi/smpif.h.in +++ b/include/smpi/smpif.h.in @@ -18,7 +18,7 @@ #include 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 99aca73414..3e0d59a8c9 100644 --- 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; -- 2.20.1