+}
+
+int PMPI_File_get_size(MPI_File fh, MPI_Offset* size)
+{
+ CHECK_FILE(fh)
+ *size = fh->size();
+ return MPI_SUCCESS;
+}
+
+int PMPI_File_get_amode(MPI_File fh, int* amode)
+{
+ CHECK_FILE(fh)
+ *amode = fh->flags();
+ return MPI_SUCCESS;
+}
+
+int PMPI_File_get_group(MPI_File fh, MPI_Group* group)
+{
+ CHECK_FILE(fh)
+ *group = fh->comm()->group();
+ return MPI_SUCCESS;
+}
+
+int PMPI_File_sync(MPI_File fh)
+{
+ CHECK_FILE(fh)
+ fh->sync();
+ return MPI_SUCCESS;
+}