diff options
| author | Elena Pourmal <epourmal@hdfgroup.org> | 2002-10-08 21:43:49 (GMT) |
|---|---|---|
| committer | Elena Pourmal <epourmal@hdfgroup.org> | 2002-10-08 21:43:49 (GMT) |
| commit | 84276675aaa6c73cff2cb2aaab6e3526f6408340 (patch) | |
| tree | 7673bc7743c3693ba75e21d110ecabc2faff412a /fortran/test | |
| parent | ec65ddbef69ca67f0b40f06e45694d8ea076692e (diff) | |
| download | hdf5-84276675aaa6c73cff2cb2aaab6e3526f6408340.zip hdf5-84276675aaa6c73cff2cb2aaab6e3526f6408340.tar.gz hdf5-84276675aaa6c73cff2cb2aaab6e3526f6408340.tar.bz2 | |
[svn-r5967]
Purpose:
Make Intel (and other) C and F90 compilers happy
Description:
There were several warnings about missing function prototypes and
wrongly defined string in the test program.
Solution:
Fix the code to include proper header files and function prototypes.
Fix the string.
Platforms tested:
Platinum (IA32) and arabica (Solaris 2.7)
Diffstat (limited to 'fortran/test')
| -rw-r--r-- | fortran/test/t.h | 3 | ||||
| -rw-r--r-- | fortran/test/tH5A.f90 | 2 |
2 files changed, 4 insertions, 1 deletions
diff --git a/fortran/test/t.h b/fortran/test/t.h index 980e597..28acdb1 100644 --- a/fortran/test/t.h +++ b/fortran/test/t.h @@ -15,6 +15,9 @@ #include "../../src/hdf5.h" #include "../src/H5f90i.h" +#include "../src/H5f90proto.h" + +char *h5_fixname(const char *base_name, hid_t fapl, char *fullname, size_t size); /* * Functions from t.c diff --git a/fortran/test/tH5A.f90 b/fortran/test/tH5A.f90 index 7f984e5..86deaac 100644 --- a/fortran/test/tH5A.f90 +++ b/fortran/test/tH5A.f90 @@ -26,7 +26,7 @@ LOGICAL, INTENT(IN) :: cleanup INTEGER, INTENT(OUT) :: total_error - CHARACTER(LEN=5), PARAMETER :: filename = "atest.h5" !File name + CHARACTER(LEN=5), PARAMETER :: filename = "atest" !File name CHARACTER(LEN=80) :: fix_filename CHARACTER(LEN=9), PARAMETER :: dsetname = "atestdset" !Dataset name CHARACTER(LEN=11), PARAMETER :: aname = "attr_string" !String Attribute name |