File tree Expand file tree Collapse file tree 1 file changed +19
-1
lines changed Expand file tree Collapse file tree 1 file changed +19
-1
lines changed Original file line number Diff line number Diff line change @@ -736,6 +736,12 @@ int main(int argc, char *argv[])
736736 int rank ;
737737 int opt ,erropt ;
738738 int reqthread = MPI_THREAD_MULTIPLE ;
739+
740+ int minor ,major ;
741+
742+ char libversion [MPI_MAX_LIBRARY_VERSION_STRING ];
743+ int libversionlen ;
744+
739745
740746 /* Read options */
741747
@@ -816,7 +822,19 @@ int main(int argc, char *argv[])
816822
817823 /* Header */
818824
819- printf ("MPI_T Variable List\n" );
825+ printf ("MPI_T Variable List\n\n" );
826+
827+ /* Print Version */
828+
829+ err = MPI_Get_version (& major ,& minor );
830+ CHECKERR ("T_Init" ,err );
831+ printf (" MPI Version: %i.%i\n" ,major ,minor );
832+
833+ err = MPI_Get_library_version (libversion ,& libversionlen );
834+ CHECKERR ("T_Init" ,err );
835+ printf (" MPI Library Version: %s\n\n" ,libversion );
836+
837+ /* Print thread support */
820838
821839 if (runmpi )
822840 {
You can’t perform that action at this time.
0 commit comments