build: MPI_Handler_function no longer defined in MPI 3.0

iraikov · iraikov · commit 552b64f37ca8 · 2020-06-15T10:01:31.000-07:00
diff --git a/init.scm b/init.scm
@@ -279,7 +279,7 @@ EOF
        free (argv);
      }
      #if MPI_VERSION >= 3
-       MPI_Comm_create_errhandler((MPI_Handler_function *)MPI_error_handler, &hdlr);
+       MPI_Comm_create_errhandler((MPI_Comm_errhandler_function *)MPI_error_handler, &hdlr);
        MPI_Comm_set_errhandler(MPI_COMM_WORLD, hdlr);
      #else  
        MPI_Errhandler_create((MPI_Handler_function *)MPI_error_handler, &hdlr);

Original file line number	Diff line number	Diff line change
`@@ -279,7 +279,7 @@ EOF`
`279`	`279`	`free (argv);`
`280`	`280`	`}`
`281`	`281`	`#if MPI_VERSION >= 3`
`282`		`- MPI_Comm_create_errhandler((MPI_Handler_function *)MPI_error_handler, &hdlr);`
	`282`	`+ MPI_Comm_create_errhandler((MPI_Comm_errhandler_function *)MPI_error_handler, &hdlr);`
`283`	`283`	`MPI_Comm_set_errhandler(MPI_COMM_WORLD, hdlr);`
`284`	`284`	`#else`
`285`	`285`	`MPI_Errhandler_create((MPI_Handler_function *)MPI_error_handler, &hdlr);`