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 "ompi_config.h"
|
||||||
|
|
||||||
#include <stdlib.h>
|
|
||||||
|
|
||||||
#include "mpi/f77/bindings.h"
|
#include "mpi/f77/bindings.h"
|
||||||
|
|
||||||
#if OMPI_HAVE_WEAK_SYMBOLS && OMPI_PROFILE_LAYER
|
#if OMPI_HAVE_WEAK_SYMBOLS && OMPI_PROFILE_LAYER
|
||||||
|
@ -16,8 +16,6 @@
|
|||||||
|
|
||||||
#include "ompi_config.h"
|
#include "ompi_config.h"
|
||||||
|
|
||||||
#include <stdio.h>
|
|
||||||
|
|
||||||
#include "mpi/f77/bindings.h"
|
#include "mpi/f77/bindings.h"
|
||||||
#include "mpi/f77/constants.h"
|
#include "mpi/f77/constants.h"
|
||||||
#include "mpi/f77/strings.h"
|
#include "mpi/f77/strings.h"
|
||||||
|
@ -16,9 +16,6 @@
|
|||||||
|
|
||||||
#include "ompi_config.h"
|
#include "ompi_config.h"
|
||||||
|
|
||||||
#include <stdio.h>
|
|
||||||
#include <stdlib.h>
|
|
||||||
|
|
||||||
#include "mpi/f77/bindings.h"
|
#include "mpi/f77/bindings.h"
|
||||||
#include "mpi/f77/constants.h"
|
#include "mpi/f77/constants.h"
|
||||||
#include "mpi/f77/strings.h"
|
#include "mpi/f77/strings.h"
|
||||||
|
@ -16,9 +16,6 @@
|
|||||||
|
|
||||||
#include "ompi_config.h"
|
#include "ompi_config.h"
|
||||||
|
|
||||||
#include <stdio.h>
|
|
||||||
#include <stdlib.h>
|
|
||||||
|
|
||||||
#include "mpi/f77/bindings.h"
|
#include "mpi/f77/bindings.h"
|
||||||
#include "errhandler/errhandler.h"
|
#include "errhandler/errhandler.h"
|
||||||
#include "communicator/communicator.h"
|
#include "communicator/communicator.h"
|
||||||
|
@ -42,25 +42,25 @@ int ompi_fortran_string_f2c(char *fstr, int len, char **cstr)
|
|||||||
}
|
}
|
||||||
|
|
||||||
if (i >= len) {
|
if (i >= len) {
|
||||||
len = 0;
|
len = 0;
|
||||||
} else {
|
} else {
|
||||||
for (; (end > fstr) && (' ' == *end); --end) {
|
for (; (end > fstr) && (' ' == *end); --end) {
|
||||||
continue;
|
continue;
|
||||||
}
|
}
|
||||||
|
|
||||||
len = end - fstr + 1;
|
len = end - fstr + 1;
|
||||||
}
|
}
|
||||||
|
|
||||||
/* Allocate space for the C string. */
|
/* Allocate space for the C string. */
|
||||||
|
|
||||||
if (NULL == (*cstr = malloc(len + 1))) {
|
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. */
|
/* Copy F77 string into C string and NULL terminate it. */
|
||||||
|
|
||||||
if (len > 0) {
|
if (len > 0) {
|
||||||
strncpy(*cstr, fstr, len);
|
strncpy(*cstr, fstr, len);
|
||||||
}
|
}
|
||||||
(*cstr)[len] = '\0';
|
(*cstr)[len] = '\0';
|
||||||
|
|
||||||
@ -77,7 +77,7 @@ int ompi_fortran_string_c2f(char *cstr, char *fstr, int len)
|
|||||||
|
|
||||||
strncpy(fstr, cstr, len);
|
strncpy(fstr, cstr, len);
|
||||||
for (i = strlen(cstr); i < len; ++i) {
|
for (i = strlen(cstr); i < len; ++i) {
|
||||||
fstr[i] = ' ';
|
fstr[i] = ' ';
|
||||||
}
|
}
|
||||||
|
|
||||||
return OMPI_SUCCESS;
|
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 **));
|
argv_array = (char ***) malloc (count * sizeof(char **));
|
||||||
|
|
||||||
for (i = 0; i < count; ++i) {
|
for (i = 0; i < count; ++i) {
|
||||||
ret = ompi_fortran_argv_f2c(current_array, len, &argv_array[i]);
|
ret = ompi_fortran_argv_f2c(current_array, len, &argv_array[i]);
|
||||||
if (OMPI_SUCCESS != ret) {
|
if (OMPI_SUCCESS != ret) {
|
||||||
return ret;
|
return ret;
|
||||||
}
|
}
|
||||||
current_array += len * i;
|
current_array += len * i;
|
||||||
}
|
}
|
||||||
*argv = argv_array;
|
*argv = argv_array;
|
||||||
return OMPI_SUCCESS;
|
return OMPI_SUCCESS;
|
||||||
|
@ -16,9 +16,6 @@
|
|||||||
|
|
||||||
#include "ompi_config.h"
|
#include "ompi_config.h"
|
||||||
|
|
||||||
#include <stdio.h>
|
|
||||||
#include <stdlib.h>
|
|
||||||
|
|
||||||
#include "mpi/f77/bindings.h"
|
#include "mpi/f77/bindings.h"
|
||||||
#include "mpi/f77/constants.h"
|
#include "mpi/f77/constants.h"
|
||||||
#include "errhandler/errhandler.h"
|
#include "errhandler/errhandler.h"
|
||||||
|
@ -16,8 +16,6 @@
|
|||||||
|
|
||||||
#include "ompi_config.h"
|
#include "ompi_config.h"
|
||||||
|
|
||||||
#include <stdlib.h>
|
|
||||||
|
|
||||||
#include "mpi/f77/bindings.h"
|
#include "mpi/f77/bindings.h"
|
||||||
#include "mpi/f77/constants.h"
|
#include "mpi/f77/constants.h"
|
||||||
#include "errhandler/errhandler.h"
|
#include "errhandler/errhandler.h"
|
||||||
|
@ -16,9 +16,6 @@
|
|||||||
|
|
||||||
#include "ompi_config.h"
|
#include "ompi_config.h"
|
||||||
|
|
||||||
#include <stdio.h>
|
|
||||||
#include <stdlib.h>
|
|
||||||
|
|
||||||
#include "mpi/f77/bindings.h"
|
#include "mpi/f77/bindings.h"
|
||||||
#include "mpi/f77/constants.h"
|
#include "mpi/f77/constants.h"
|
||||||
#include "errhandler/errhandler.h"
|
#include "errhandler/errhandler.h"
|
||||||
|
@ -16,9 +16,6 @@
|
|||||||
|
|
||||||
#include "ompi_config.h"
|
#include "ompi_config.h"
|
||||||
|
|
||||||
#include <stdio.h>
|
|
||||||
#include <stdlib.h>
|
|
||||||
|
|
||||||
#include "mpi/f77/bindings.h"
|
#include "mpi/f77/bindings.h"
|
||||||
#include "errhandler/errhandler.h"
|
#include "errhandler/errhandler.h"
|
||||||
#include "communicator/communicator.h"
|
#include "communicator/communicator.h"
|
||||||
|
@ -16,9 +16,6 @@
|
|||||||
|
|
||||||
#include "ompi_config.h"
|
#include "ompi_config.h"
|
||||||
|
|
||||||
#include <stdio.h>
|
|
||||||
#include <stdlib.h>
|
|
||||||
|
|
||||||
#include "mpi/f77/bindings.h"
|
#include "mpi/f77/bindings.h"
|
||||||
#include "errhandler/errhandler.h"
|
#include "errhandler/errhandler.h"
|
||||||
#include "communicator/communicator.h"
|
#include "communicator/communicator.h"
|
||||||
|
@ -16,9 +16,6 @@
|
|||||||
|
|
||||||
#include "ompi_config.h"
|
#include "ompi_config.h"
|
||||||
|
|
||||||
#include <stdio.h>
|
|
||||||
#include <stdlib.h>
|
|
||||||
|
|
||||||
#include "mpi/f77/bindings.h"
|
#include "mpi/f77/bindings.h"
|
||||||
#include "errhandler/errhandler.h"
|
#include "errhandler/errhandler.h"
|
||||||
#include "communicator/communicator.h"
|
#include "communicator/communicator.h"
|
||||||
|
@ -16,9 +16,6 @@
|
|||||||
|
|
||||||
#include "ompi_config.h"
|
#include "ompi_config.h"
|
||||||
|
|
||||||
#include <stdio.h>
|
|
||||||
#include <stdlib.h>
|
|
||||||
|
|
||||||
#include "mpi/f77/bindings.h"
|
#include "mpi/f77/bindings.h"
|
||||||
#include "errhandler/errhandler.h"
|
#include "errhandler/errhandler.h"
|
||||||
#include "communicator/communicator.h"
|
#include "communicator/communicator.h"
|
||||||
|
@ -16,9 +16,6 @@
|
|||||||
|
|
||||||
#include "ompi_config.h"
|
#include "ompi_config.h"
|
||||||
|
|
||||||
#include <stdio.h>
|
|
||||||
#include <stdlib.h>
|
|
||||||
|
|
||||||
#include "mpi/f77/bindings.h"
|
#include "mpi/f77/bindings.h"
|
||||||
#include "errhandler/errhandler.h"
|
#include "errhandler/errhandler.h"
|
||||||
#include "communicator/communicator.h"
|
#include "communicator/communicator.h"
|
||||||
|
@ -16,9 +16,6 @@
|
|||||||
|
|
||||||
#include "ompi_config.h"
|
#include "ompi_config.h"
|
||||||
|
|
||||||
#include <stdio.h>
|
|
||||||
#include <stdlib.h>
|
|
||||||
|
|
||||||
#include "mpi/f77/bindings.h"
|
#include "mpi/f77/bindings.h"
|
||||||
#include "mpi/f77/constants.h"
|
#include "mpi/f77/constants.h"
|
||||||
#include "errhandler/errhandler.h"
|
#include "errhandler/errhandler.h"
|
||||||
|
@ -16,9 +16,6 @@
|
|||||||
|
|
||||||
#include "ompi_config.h"
|
#include "ompi_config.h"
|
||||||
|
|
||||||
#include <stdio.h>
|
|
||||||
#include <stdlib.h>
|
|
||||||
|
|
||||||
#include "mpi/f77/bindings.h"
|
#include "mpi/f77/bindings.h"
|
||||||
#include "mpi/f77/constants.h"
|
#include "mpi/f77/constants.h"
|
||||||
#include "errhandler/errhandler.h"
|
#include "errhandler/errhandler.h"
|
||||||
|
@ -16,9 +16,6 @@
|
|||||||
|
|
||||||
#include "ompi_config.h"
|
#include "ompi_config.h"
|
||||||
|
|
||||||
#include <stdio.h>
|
|
||||||
#include <stdlib.h>
|
|
||||||
|
|
||||||
#include "mpi/f77/bindings.h"
|
#include "mpi/f77/bindings.h"
|
||||||
#include "mpi/f77/constants.h"
|
#include "mpi/f77/constants.h"
|
||||||
#include "errhandler/errhandler.h"
|
#include "errhandler/errhandler.h"
|
||||||
|
Загрузка…
x
Ссылка в новой задаче
Block a user