diff options
Diffstat (limited to 'windows/fortran/test')
-rw-r--r-- | windows/fortran/test/checkfortrantests.bat | 89 | ||||
-rwxr-xr-x | windows/fortran/test/testhdf5_fortran.bat | 17 |
2 files changed, 89 insertions, 17 deletions
diff --git a/windows/fortran/test/checkfortrantests.bat b/windows/fortran/test/checkfortrantests.bat new file mode 100644 index 0000000..db17437 --- /dev/null +++ b/windows/fortran/test/checkfortrantests.bat @@ -0,0 +1,89 @@ +@echo off
+rem
+rem Copyright by The HDF Group.
+rem Copyright by the Board of Trustees of the University of Illinois.
+rem All rights reserved.
+rem
+rem This file is part of HDF5. The full HDF5 copyright notice, including
+rem terms governing use, modification, and redistribution, is contained in
+rem the files COPYING and Copyright.html. COPYING can be found at the root
+rem of the source code distribution tree; Copyright.html can be found at the
+rem root level of an installed copy of the electronic HDF5 document set and
+rem is linked from the top-level documents page. It can also be found at
+rem http://hdfgroup.org/HDF5/doc/Copyright.html. If you do not have
+rem access to either file, you may request a copy from help@hdfgroup.org.
+rem
+rem Tests for the hdf5 fortran library
+rem
+rem Created: Scott Wegner, 9/6/07
+rem Modified:
+rem
+
+setlocal enabledelayedexpansion
+pushd %~dp0
+
+rem Clean any variables starting with "HDF5_FORTTEST_", as we use these for our
+rem tests. Also clear "HDF5_FORTTEST_TESTS", as we will be addding all of our tests
+rem to this variable.
+rem Set at least one variable in set beforehand to avoid error message.
+rem --SJW 9/5/07
+set hdf5_forttest_=foo
+for /f "tokens=1 delims==" %%a in ('set hdf5_forttest_') do set %%a=
+set hdf5_forttest_tests=
+
+goto main
+
+
+rem Function to add a test to the test suite.
+rem Expects the following parameters:
+rem %1 - Name of the forttest being tested
+rem %2 - Relative path of script
+:add_test
+
+ set hdf5_forttest_tests=%hdf5_forttest_tests% %1
+ set hdf5_forttest_%1_test=%CD%\%2\%1
+
+ exit /b
+
+
+rem Run all of the tests that have been added to the suite. Print a header
+rem at the beginning of each one. Short-circuit if a test fails.
+rem Expects the following parameters:
+rem %1 - release or debug version
+rem %2 - "dll" or nothing
+:run_tests
+ for %%a in (%hdf5_forttest_tests%) do (
+ echo.
+ echo.************************************
+ echo. Testing %%a ^(%1 %2^)
+ echo.************************************
+
+ rem Only add our parameters for batch scripts.
+ call !hdf5_forttest_%%a_test:.bat= %1 %2!
+ rem Exit early if test fails.
+ if !errorlevel! neq 0 exit /b
+ )
+
+ rem If we get here, that means all of our tests passed.
+ echo.All Fortran library tests passed.
+
+ exit /b
+
+
+rem This is where we add tests to the suite, and run them all at the end.
+rem Make sure only to run dll versions of tests you build dll for
+rem Also make sure to add *.bat to batch scripts, as the above functions rely
+rem on it for sending parameters. --SJW 9/6/07
+:main
+
+ call :add_test testhdf5_fortran%2 .\testhdf5_fortran%2\%1
+ call :add_test flush1_fortran%2 .\flush1_fortran%2\%1
+ call :add_test flush2_fortran%2 .\flush2_fortran%2\%1
+
+
+ rem Run the tests, passing in which version to run
+ call :run_tests %*
+
+ popd
+ endlocal & exit /b
+
\ No newline at end of file diff --git a/windows/fortran/test/testhdf5_fortran.bat b/windows/fortran/test/testhdf5_fortran.bat deleted file mode 100755 index 99ff10f..0000000 --- a/windows/fortran/test/testhdf5_fortran.bat +++ /dev/null @@ -1,17 +0,0 @@ -@REM Copyright by The HDF Group.
-@REM Copyright by the Board of Trustees of the University of Illinois.
-@REM All rights reserved.
-@REM
-@REM This file is part of HDF5. The full HDF5 copyright notice, including
-@REM terms governing use, modification, and redistribution, is contained in
-@REM the files COPYING and Copyright.html. COPYING can be found at the root
-@REM of the source code distribution tree; Copyright.html can be found at the
-@REM root level of an installed copy of the electronic HDF5 document set and
-@REM is linked from the top-level documents page. It can also be found at
-@REM http://hdfgroup.org/HDF5/doc/Copyright.html. If you do not have
-@REM access to either file, you may request a copy from help@hdfgroup.org.
-
-testhdf5_fortran%2\%1\testhdf5_fortran%2
-flush1_fortran%2\%1\flush1_fortran%2
-copy fflush1.h5 flush2_fortran\%1\fflush1.h5
-flush2_fortran%2\%1\flush2_fortran%2
|