[svn-r14340] Maintenance for VMS system:

Skip one of the tests in flush2.c since it looks like VMS system
		flsuhes the file anyway (like on Winodws with DLLs)

		Renamed files family*.h5 that are used in backward compatibility
		testing to have only one '.' in a file name, otherwise VMS system
		becomes confused and test fails.

		Cleaned up the only test (Fortran multi-file test) that is failing on 
		VMS (C counterpart passesa).

		Added new script to facilitate the build process on VMS
		Updated MANIFEST

PLatforms tested: VMS server, kagiso and linew (minor changes)
This commit is contained in:
Elena Pourmal 2007-12-13 13:17:02 -05:00
parent d3c3b4138a
commit 98fb2db938
9 changed files with 51 additions and 8 deletions

View File

@ -749,10 +749,10 @@
./test/external.c
./test/error_test.c
./test/err_compat.c
./test/family_v1.6_00000.h5
./test/family_v1.6_00001.h5
./test/family_v1.6_00002.h5
./test/family_v1.6_00003.h5
./test/family_v16_00000.h5
./test/family_v16_00001.h5
./test/family_v16_00002.h5
./test/family_v16_00003.h5
./test/fheap.c
./test/fill_old.h5
./test/fillval.c
@ -1623,6 +1623,7 @@
./vms/test/check.com
./vms/test/make.com
./vms/build.com
./vms/install.com
./vms/make.com
./vms/tools/h5copy/make.com

View File

@ -244,6 +244,12 @@
CALL h5fcreate_f(fix_filename, H5F_ACC_TRUNC_F, file_id, error, access_prp = fapl)
CALL check("h5fcreate_f", error, total_error)
if(error .ne. 0) then
write(*,*) "Cannot create file using multi-file driver... Exiting...."
total_error = 1
call h5pclose_f(fapl, error)
return
endif
!

View File

@ -196,7 +196,8 @@ main(void)
#if defined _WIN32 && defined _HDF5USEDLL_
SKIPPED();
puts(" DLL will flush the file even when calling _exit, skip this test temporarily");
#elif defined H5_VMS
SKIPPED();
#else
H5_FAILED()
goto error;
@ -218,7 +219,8 @@ main(void)
#if defined _WIN32 && defined _HDF5USEDLL_
SKIPPED();
puts(" DLL will flush the file even when calling _exit, skip this test temporarily");
#elif defined H5_VMS
SKIPPED();
#else
H5_FAILED()
goto error;

View File

@ -49,7 +49,7 @@ const char *FILENAME[] = {
NULL
};
#define COMPAT_BASENAME "family_v1.6_"
#define COMPAT_BASENAME "family_v16_"
/*-------------------------------------------------------------------------
@ -787,7 +787,7 @@ error:
* The source file was created by the test/file_handle.c
* of the v1.6 library. Then tools/misc/h5repart.c was
* used to concantenated. The command was "h5repart -m 5k
* family_file%05d.h5 family_v1.6_%05d.h5".
* family_file%05d.h5 family_v16_%05d.h5".
*
* Return: Success: 0
* Failure: -1

34
vms/build.com Normal file
View File

@ -0,0 +1,34 @@
$!#
$!# Copyright by The HDF Group.
$!# Copyright by the Board of Trustees of the University of Illinois.
$!# All rights reserved.
$!#
$!# This file is part of HDF5. The full HDF5 copyright notice, including
$!# terms governing use, modification, and redistribution, is contained in
$!# the files COPYING and Copyright.html. COPYING can be found at the root
$!# of the source code distribution tree; Copyright.html can be found at the
$!# root level of an installed copy of the electronic HDF5 document set and
$!# is linked from the top-level documents page. It can also be found at
$!# http://hdfgroup.org/HDF5/doc/Copyright.html. If you do not have
$!# access to either file, you may request a copy from help@hdfgroup.org.
$!#
$!
$!
$! This file builds C, Frtran, C++ HDF5 librraies and runs the tests
$! Specify location of the top HDF5 source directory
$
$ hdf5top == "sys$sysusers:[pourmale.hdf5]"
$ len = F$LENGTH(hdf5top)
$ tmp = F$EXTRACT(0, len-1, hdf5top)
$ hdf5vms = tmp + ".VMS]"
$ hdf5ctest = tmp + ".TEST]"
$ hdf5f90test = tmp + ".FORTRAN.TEST]"
$ hdf5cxxtest = tmp + ".C__.TEST]"
$ set def 'hdf5vms'
$@make
$ set def 'hdf5ctest'
@check
$ set def 'hdf5f90test'
@check
$ set def 'hdf5cxxtest'
@check