From ed6944c01211775eac06fd39ce15648c18fa1ecd Mon Sep 17 00:00:00 2001 From: Fang Guo Date: Wed, 21 Dec 2005 15:58:59 -0500 Subject: [svn-r11829] Purpose: Maintenance on Windows Description: Fix an error Solution: Platforms tested: Misc. update: --- windows/hl/fortran/examples/test_hl_f90examples.BAT | 9 ++++++--- 1 file changed, 6 insertions(+), 3 deletions(-) diff --git a/windows/hl/fortran/examples/test_hl_f90examples.BAT b/windows/hl/fortran/examples/test_hl_f90examples.BAT index 6466d82..d258eec 100644 --- a/windows/hl/fortran/examples/test_hl_f90examples.BAT +++ b/windows/hl/fortran/examples/test_hl_f90examples.BAT @@ -29,11 +29,14 @@ if %2.==. GOTO TEST GOTO WRONG :TEST -echo Testing %1 %2 version of High Level Fortran examples echo. - HLf90examples%1%2\ex_lite%2 - +if ERRORLEVEL == 0 ( +echo. %1 %2 version of High Level Fortran examples PASSED +)else ( +echo. %1 %2 version of High Level Fortran examples FAILED +) +echo. GOTO END :WRONG -- cgit v0.12