Package: hdf5
Version: 1.14.5+repack-2
Tags: ftbfs
Usertags: hppa

The fortran test is the only one which fails on hppa:
https://buildd.debian.org/status/fetch.php?pkg=hdf5&arch=hppa&ver=1.14.5%2Brepack-2&stamp=1735623616&raw=0

Testing object functions                                                        
       PASSED
 h5ovisit_f 1 FAILED
 h5ovisit_f  1a FAILED
 h5ovisit_f 2 FAILED
 h5ovisit_f 2a FAILED
 h5ovisit_by_name_f 1 FAILED
 h5ovisit_by_name_f 1a FAILED
 Testing object visiting functions                                              
       *FAILED*

Which ones exactly can be seen with this patch:

--- ./fortran/test/tH5O_F03.F90.org     2025-01-02 11:39:56.228175966 +0000
+++ ./fortran/test/tH5O_F03.F90 2025-01-02 11:52:46.131359428 +0000
@@ -487,39 +487,39 @@
   udata%field = H5O_INFO_ALL_F
   udata%idx = 1
   CALL h5ovisit_f(fid, H5_INDEX_NAME_F, H5_ITER_INC_F, fun_ptr, f_ptr, 
ret_val, error)
-  CALL check("h5ovisit_f", error, total_error)
+  CALL check("h5ovisit_f 1", error, total_error)
   IF(ret_val.LT.0)THEN
-     CALL check("h5ovisit_f", -1, total_error)
+     CALL check("h5ovisit_f 1a", -1, total_error)
   ENDIF

   ! Test fields option
   udata%field = H5O_INFO_ALL_F
   udata%idx = 1
   CALL h5ovisit_f(fid, H5_INDEX_NAME_F, H5_ITER_INC_F, fun_ptr, f_ptr, 
ret_val, error, fields=udata%field)
-  CALL check("h5ovisit_f", error, total_error)
+  CALL check("h5ovisit_f 2", error, total_error)
   IF(ret_val.LT.0)THEN
-     CALL check("h5ovisit_f", -1, total_error)
+     CALL check("h5ovisit_f 2a", -1, total_error)
   ENDIF
   udata%field = H5O_INFO_BASIC_F
   udata%idx = 1
   CALL h5ovisit_f(fid, H5_INDEX_NAME_F, H5_ITER_INC_F, fun_ptr, f_ptr, 
ret_val, error, fields=udata%field)
-  CALL check("h5ovisit_f", error, total_error)
+  CALL check("h5ovisit_f 3", error, total_error)
   IF(ret_val.LT.0)THEN
-     CALL check("h5ovisit_f", -1, total_error)
+     CALL check("h5ovisit_f 3a", -1, total_error)
   ENDIF
   udata%field = H5O_INFO_TIME_F
   udata%idx = 1
   CALL h5ovisit_f(fid, H5_INDEX_NAME_F, H5_ITER_INC_F, fun_ptr, f_ptr, 
ret_val, error, fields=udata%field)
-  CALL check("h5ovisit_f", error, total_error)
+  CALL check("h5ovisit_f 4", error, total_error)
   IF(ret_val.LT.0)THEN
-     CALL check("h5ovisit_f", -1, total_error)
+     CALL check("h5ovisit_f 4a", -1, total_error)
   ENDIF
   udata%field = H5O_INFO_NUM_ATTRS_F
   udata%idx = 1
   CALL h5ovisit_f(fid, H5_INDEX_NAME_F, H5_ITER_INC_F, fun_ptr, f_ptr, 
ret_val, error, fields=udata%field)
-  CALL check("h5ovisit_f", error, total_error)
+  CALL check("h5ovisit_f 5", error, total_error)
   IF(ret_val.LT.0)THEN
-     CALL check("h5ovisit_f", -1, total_error)
+     CALL check("h5ovisit_f 5a", -1, total_error)
   ENDIF

   ! Test h5ovisit_by_name_f
@@ -527,32 +527,32 @@
   udata%idx = 1
   udata%field = H5O_INFO_ALL_F
   CALL h5ovisit_by_name_f(fid, object_name, H5_INDEX_NAME_F, H5_ITER_INC_F, 
fun_ptr, f_ptr, ret_val, error, fields=udata%field)
-  CALL check("h5ovisit_by_name_f", error, total_error)
+  CALL check("h5ovisit_by_name_f 1", error, total_error)
   IF(ret_val.LT.0)THEN
-     CALL check("h5ovisit_by_name_f", -1, total_error)
+     CALL check("h5ovisit_by_name_f 1a", -1, total_error)
   ENDIF

   ! Test fields option
   udata%idx = 1
   udata%field = H5O_INFO_BASIC_F
   CALL h5ovisit_by_name_f(fid, object_name, H5_INDEX_NAME_F, H5_ITER_INC_F, 
fun_ptr, f_ptr, ret_val, error, fields=udata%field)
-  CALL check("h5ovisit_by_name_f", error, total_error)
+  CALL check("h5ovisit_by_name_f 2", error, total_error)
   IF(ret_val.LT.0)THEN
-     CALL check("h5ovisit_by_name_f", -1, total_error)
+     CALL check("h5ovisit_by_name_f 2a", -1, total_error)
   ENDIF
   udata%idx = 1
   udata%field = H5O_INFO_TIME_F
   CALL h5ovisit_by_name_f(fid, object_name, H5_INDEX_NAME_F, H5_ITER_INC_F, 
fun_ptr, f_ptr, ret_val, error, fields=udata%field)
-  CALL check("h5ovisit_by_name_f", error, total_error)
+  CALL check("h5ovisit_by_name_f 3", error, total_error)
   IF(ret_val.LT.0)THEN
-     CALL check("h5ovisit_by_name_f", -1, total_error)
+     CALL check("h5ovisit_by_name_f 3a", -1, total_error)
   ENDIF
   udata%idx = 1
   udata%field =  H5O_INFO_NUM_ATTRS_F
   CALL h5ovisit_by_name_f(fid, object_name, H5_INDEX_NAME_F, H5_ITER_INC_F, 
fun_ptr, f_ptr, ret_val, error, fields=udata%field)
-  CALL check("h5ovisit_by_name_f", error, total_error)
+  CALL check("h5ovisit_by_name_f 4", error, total_error)
   IF(ret_val.LT.0)THEN
-     CALL check("h5ovisit_by_name_f", -1, total_error)
+     CALL check("h5ovisit_by_name_f 4a", -1, total_error)
   ENDIF

   CALL h5fclose_f(fid, error)


I tried to debug this, but I'm lacking too much fortran or hdf knowledge.
It seems the gmtime() function is involved.
Could it be caused by the fact that time_t is now 64bit on hppa.
Note: hppa is a big-endian 32-bit userspace platform.

Helge

Reply via email to