diff options
author | Albert Cheng <acheng@hdfgroup.org> | 2009-12-26 10:12:28 (GMT) |
---|---|---|
committer | Albert Cheng <acheng@hdfgroup.org> | 2009-12-26 10:12:28 (GMT) |
commit | aea22826003bbcc0ce2c20692d47b7f8961e0465 (patch) | |
tree | e38c68e28fa11202e837d0514a41625d542bdef8 /fortran/src/h5fc.in | |
parent | 51e9b5952757a7cf68411b4a85e2914f19879749 (diff) | |
download | hdf5-aea22826003bbcc0ce2c20692d47b7f8961e0465.zip hdf5-aea22826003bbcc0ce2c20692d47b7f8961e0465.tar.gz hdf5-aea22826003bbcc0ce2c20692d47b7f8961e0465.tar.bz2 |
[svn-r18056] Bug fix: 1192
Description:
Fixed exit code (sometimes return code in Main) to follow the HDF5 standards.
Tested:
Jam, both serial and parallel.
Diffstat (limited to 'fortran/src/h5fc.in')
-rwxr-xr-x | fortran/src/h5fc.in | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/fortran/src/h5fc.in b/fortran/src/h5fc.in index df52971..db44600 100755 --- a/fortran/src/h5fc.in +++ b/fortran/src/h5fc.in @@ -36,6 +36,10 @@ HL="@HL@" ## ## ############################################################################ +# Constants definitions +EXIT_SUCCESS=0 +EXIT_FAILURE=1 + host_os="@host_os@" prog_name="`basename $0`" @@ -89,7 +93,7 @@ usage() { echo " HDF5_FC - use a different Fortran 90 or 95 compiler" echo " HDF5_FLINKER - use a different linker" echo " " - exit 1 + exit $EXIT_FAILURE } # Show the configuration summary of the library recorded in the @@ -101,7 +105,7 @@ showconfigure() } # Main -status=0 +status=$EXIT_SUCCESS if test "$#" = "0"; then # No parameters specified, issue usage statement and exit. |