CFD/hypre
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Removed the Fortran interface for hypre_mpi_comm_f2c() because it is problematic

Browse Source 
and no longer needed anyway.
This commit is contained in:
falgout 2011-09-29 00:44:52 +00:00
parent aa55608ea9
commit fb6334d000
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
utilities/hypre_mpi_comm_f2c.c
View File

@ -19,12 +19,14 @@
/*--------------------------------------------------------------------------
*--------------------------------------------------------------------------*/
#if 0 /* This function is problematic and no longer needed anyway. */
void
hypre_F90_IFACE(hypre_mpi_comm_f2c, HYPRE_MPI_COMM_F2C)
(hypre_F90_Obj *c_comm,
(hypre_F90_Obj *c_comm,
hypre_F90_Comm *f_comm,
hypre_F90_Int *ierr)
{
*c_comm = (hypre_F90_Obj) hypre_MPI_Comm_f2c( (hypre_int) *f_comm );
*ierr = 0;
}
#endif