Remove all useless includes. They get included anyway from others include ... The way we
manage the dependencies still need some rework ... This commit was SVN r5744.
Этот коммит содержится в:
родитель
ea8c91627d
Коммит
81d1d0322a
@ -16,8 +16,6 @@
|
||||
|
||||
#include "ompi_config.h"
|
||||
|
||||
#include <stdlib.h>
|
||||
|
||||
#include "mpi/f77/bindings.h"
|
||||
|
||||
#if OMPI_HAVE_WEAK_SYMBOLS && OMPI_PROFILE_LAYER
|
||||
|
@ -16,8 +16,6 @@
|
||||
|
||||
#include "ompi_config.h"
|
||||
|
||||
#include <stdio.h>
|
||||
|
||||
#include "mpi/f77/bindings.h"
|
||||
#include "mpi/f77/constants.h"
|
||||
#include "mpi/f77/strings.h"
|
||||
|
@ -16,9 +16,6 @@
|
||||
|
||||
#include "ompi_config.h"
|
||||
|
||||
#include <stdio.h>
|
||||
#include <stdlib.h>
|
||||
|
||||
#include "mpi/f77/bindings.h"
|
||||
#include "mpi/f77/constants.h"
|
||||
#include "mpi/f77/strings.h"
|
||||
|
@ -16,9 +16,6 @@
|
||||
|
||||
#include "ompi_config.h"
|
||||
|
||||
#include <stdio.h>
|
||||
#include <stdlib.h>
|
||||
|
||||
#include "mpi/f77/bindings.h"
|
||||
#include "errhandler/errhandler.h"
|
||||
#include "communicator/communicator.h"
|
||||
|
@ -42,25 +42,25 @@ int ompi_fortran_string_f2c(char *fstr, int len, char **cstr)
|
||||
}
|
||||
|
||||
if (i >= len) {
|
||||
len = 0;
|
||||
len = 0;
|
||||
} else {
|
||||
for (; (end > fstr) && (' ' == *end); --end) {
|
||||
for (; (end > fstr) && (' ' == *end); --end) {
|
||||
continue;
|
||||
}
|
||||
|
||||
len = end - fstr + 1;
|
||||
len = end - fstr + 1;
|
||||
}
|
||||
|
||||
/* Allocate space for the C string. */
|
||||
|
||||
if (NULL == (*cstr = malloc(len + 1))) {
|
||||
return OMPI_ERR_OUT_OF_RESOURCE;
|
||||
return OMPI_ERR_OUT_OF_RESOURCE;
|
||||
}
|
||||
|
||||
/* Copy F77 string into C string and NULL terminate it. */
|
||||
|
||||
if (len > 0) {
|
||||
strncpy(*cstr, fstr, len);
|
||||
strncpy(*cstr, fstr, len);
|
||||
}
|
||||
(*cstr)[len] = '\0';
|
||||
|
||||
@ -77,7 +77,7 @@ int ompi_fortran_string_c2f(char *cstr, char *fstr, int len)
|
||||
|
||||
strncpy(fstr, cstr, len);
|
||||
for (i = strlen(cstr); i < len; ++i) {
|
||||
fstr[i] = ' ';
|
||||
fstr[i] = ' ';
|
||||
}
|
||||
|
||||
return OMPI_SUCCESS;
|
||||
@ -136,11 +136,11 @@ int ompi_fortran_multiple_argvs_f2c(int count, char *array, int len,
|
||||
argv_array = (char ***) malloc (count * sizeof(char **));
|
||||
|
||||
for (i = 0; i < count; ++i) {
|
||||
ret = ompi_fortran_argv_f2c(current_array, len, &argv_array[i]);
|
||||
if (OMPI_SUCCESS != ret) {
|
||||
return ret;
|
||||
}
|
||||
current_array += len * i;
|
||||
ret = ompi_fortran_argv_f2c(current_array, len, &argv_array[i]);
|
||||
if (OMPI_SUCCESS != ret) {
|
||||
return ret;
|
||||
}
|
||||
current_array += len * i;
|
||||
}
|
||||
*argv = argv_array;
|
||||
return OMPI_SUCCESS;
|
||||
|
@ -16,9 +16,6 @@
|
||||
|
||||
#include "ompi_config.h"
|
||||
|
||||
#include <stdio.h>
|
||||
#include <stdlib.h>
|
||||
|
||||
#include "mpi/f77/bindings.h"
|
||||
#include "mpi/f77/constants.h"
|
||||
#include "errhandler/errhandler.h"
|
||||
|
@ -16,8 +16,6 @@
|
||||
|
||||
#include "ompi_config.h"
|
||||
|
||||
#include <stdlib.h>
|
||||
|
||||
#include "mpi/f77/bindings.h"
|
||||
#include "mpi/f77/constants.h"
|
||||
#include "errhandler/errhandler.h"
|
||||
|
@ -16,9 +16,6 @@
|
||||
|
||||
#include "ompi_config.h"
|
||||
|
||||
#include <stdio.h>
|
||||
#include <stdlib.h>
|
||||
|
||||
#include "mpi/f77/bindings.h"
|
||||
#include "mpi/f77/constants.h"
|
||||
#include "errhandler/errhandler.h"
|
||||
|
@ -16,9 +16,6 @@
|
||||
|
||||
#include "ompi_config.h"
|
||||
|
||||
#include <stdio.h>
|
||||
#include <stdlib.h>
|
||||
|
||||
#include "mpi/f77/bindings.h"
|
||||
#include "errhandler/errhandler.h"
|
||||
#include "communicator/communicator.h"
|
||||
|
@ -16,9 +16,6 @@
|
||||
|
||||
#include "ompi_config.h"
|
||||
|
||||
#include <stdio.h>
|
||||
#include <stdlib.h>
|
||||
|
||||
#include "mpi/f77/bindings.h"
|
||||
#include "errhandler/errhandler.h"
|
||||
#include "communicator/communicator.h"
|
||||
|
@ -16,9 +16,6 @@
|
||||
|
||||
#include "ompi_config.h"
|
||||
|
||||
#include <stdio.h>
|
||||
#include <stdlib.h>
|
||||
|
||||
#include "mpi/f77/bindings.h"
|
||||
#include "errhandler/errhandler.h"
|
||||
#include "communicator/communicator.h"
|
||||
|
@ -16,9 +16,6 @@
|
||||
|
||||
#include "ompi_config.h"
|
||||
|
||||
#include <stdio.h>
|
||||
#include <stdlib.h>
|
||||
|
||||
#include "mpi/f77/bindings.h"
|
||||
#include "errhandler/errhandler.h"
|
||||
#include "communicator/communicator.h"
|
||||
|
@ -16,9 +16,6 @@
|
||||
|
||||
#include "ompi_config.h"
|
||||
|
||||
#include <stdio.h>
|
||||
#include <stdlib.h>
|
||||
|
||||
#include "mpi/f77/bindings.h"
|
||||
#include "errhandler/errhandler.h"
|
||||
#include "communicator/communicator.h"
|
||||
|
@ -16,9 +16,6 @@
|
||||
|
||||
#include "ompi_config.h"
|
||||
|
||||
#include <stdio.h>
|
||||
#include <stdlib.h>
|
||||
|
||||
#include "mpi/f77/bindings.h"
|
||||
#include "mpi/f77/constants.h"
|
||||
#include "errhandler/errhandler.h"
|
||||
|
@ -16,9 +16,6 @@
|
||||
|
||||
#include "ompi_config.h"
|
||||
|
||||
#include <stdio.h>
|
||||
#include <stdlib.h>
|
||||
|
||||
#include "mpi/f77/bindings.h"
|
||||
#include "mpi/f77/constants.h"
|
||||
#include "errhandler/errhandler.h"
|
||||
|
@ -16,9 +16,6 @@
|
||||
|
||||
#include "ompi_config.h"
|
||||
|
||||
#include <stdio.h>
|
||||
#include <stdlib.h>
|
||||
|
||||
#include "mpi/f77/bindings.h"
|
||||
#include "mpi/f77/constants.h"
|
||||
#include "errhandler/errhandler.h"
|
||||
|
Загрузка…
x
Ссылка в новой задаче
Block a user