nf_error.F (netcdf-fortran-4.4.4) | : | nf_error.F (netcdf-fortran-4.4.5) | ||
---|---|---|---|---|
skipping to change at line 68 | skipping to change at line 68 | |||
C | C | |||
C Use for logging error conditions | C Use for logging error conditions | |||
C | C | |||
subroutine errore(msg, err) | subroutine errore(msg, err) | |||
implicit none | implicit none | |||
character*(*) msg | character*(*) msg | |||
integer err | integer err | |||
#include "tests.inc" | #include "tests.inc" | |||
nfails = nfails + 1 | ||||
call errorc(msg, nf_strerror(err)) | call errorc(msg, nf_strerror(err)) | |||
end | end | |||
End of changes. 1 change blocks. | ||||
1 lines changed or deleted | 0 lines changed or added |