Commit 6fbec930 authored by William Gropp's avatar William Gropp
Browse files

[svn-r10670] Added missing check for Fortran before test; fixes #1759

parent 5123b634
......@@ -440,7 +440,9 @@ int MPIR_Init_thread(int * argc, char ***argv, int required, int * provided)
MPIU_Assert( MPIR_Process.attrs.tag_ub >= 32767 );
/* very nasty bugs will occur if this does not hold */
MPIU_Assert(sizeof(MPI_Status) == MPIF_STATUS_SIZE*sizeof(MPI_Fint));
/* Capture the level of thread support provided */
MPIR_ThreadInfo.thread_provided = thread_provided;
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment