+/* Abort when using unimplemented functions. Currently, it should not happen,
+ * since sizeof(MPI_Count) == sizeof(int), but it avoids compile errors about
+ * undefined functions. */
+#define err_unimpl(func) do { \
+ fprintf(stderr, "ERROR: %s is not implemented\n", #func); \
+ abort(); \
+ } while (0)
+
+#define MPI_Type_size_x(a,b) err_unimpl(MPI_Type_size_x)
+#define MPI_Type_get_extent_x(a,b,c) err_unimpl(MPI_Type_get_extent_x)
+#define MPI_Type_get_true_extent_x(a,b,c) err_unimpl(MPI_Type_get_true_extent_x)
+#define MPI_Get_elements_x(a,b,c) err_unimpl(MPI_Get_elements_x)
+#define MPI_Status_set_elements_x(a,b,c) err_unimpl(MPI_Status_set_elements_x)
+