diff options
| author | Scot Breitenfeld <brtnfld@hdfgroup.org> | 2023-10-23 19:35:42 (GMT) |
|---|---|---|
| committer | GitHub <noreply@github.com> | 2023-10-23 19:35:42 (GMT) |
| commit | 34f4569cdd65c51476fe4d295b87de7a9c90f184 (patch) | |
| tree | 7dea13c7400666b3f0a83e868feaace733cf7b71 /fortran/testpar/subfiling.F90 | |
| parent | a4c318de285e60d58a71ac5c3d7ee146f7e43824 (diff) | |
| download | hdf5-34f4569cdd65c51476fe4d295b87de7a9c90f184.zip hdf5-34f4569cdd65c51476fe4d295b87de7a9c90f184.tar.gz hdf5-34f4569cdd65c51476fe4d295b87de7a9c90f184.tar.bz2 | |
update stat arg for apple (#3726)
* update stat arg for apple
* use H5_HAVE_DARWIN for Apple ifdef
* fix typo
* removed duplicate H5_ih_info_t
* added fortran async test to cmake
Diffstat (limited to 'fortran/testpar/subfiling.F90')
| -rw-r--r-- | fortran/testpar/subfiling.F90 | 11 |
1 files changed, 8 insertions, 3 deletions
diff --git a/fortran/testpar/subfiling.F90 b/fortran/testpar/subfiling.F90 index 043ac6c..a677bea 100644 --- a/fortran/testpar/subfiling.F90 +++ b/fortran/testpar/subfiling.F90 @@ -54,6 +54,7 @@ PROGRAM subfiling_test INTEGER(HID_T) :: driver_id CHARACTER(len=8) :: hex1, hex2 + CHARACTER(len=1) :: arg ! ! initialize MPI @@ -336,10 +337,14 @@ PROGRAM subfiling_test WRITE(*,"(A,A)") "Failed to find the stub subfile ",TRIM(filename) nerrors = nerrors + 1 ENDIF - - CALL EXECUTE_COMMAND_LINE("stat --format='%i' "//filename//" >> tmp_inode", EXITSTAT=i) +#ifdef H5_HAVE_DARWIN + arg(1:1)="f" +#else + arg(1:1)="c" +#endif + CALL EXECUTE_COMMAND_LINE("stat -"//arg(1:1)//" %i "//filename//" >> tmp_inode", EXITSTAT=i) IF(i.ne.0)THEN - WRITE(*,"(A,A)") "Failed to stat the stub subfile ",TRIM(filename) + WRITE(*,"(A,A)") "Failed to stat the stub subfile ",TRIM(filename) nerrors = nerrors + 1 ENDIF |