| bfe649d8 | 30-Jun-2017 |
Satish Balay <balay@mcs.anl.gov> |
fortran: add SETERRA() and CHKERRA() macros as ifort flags 'return' in 'program main' as error
/sandbox/petsc/petsc.clone-2/src/sys/examples/tutorials/ex4f90.F90(42): error #6353: A RETURN statement
fortran: add SETERRA() and CHKERRA() macros as ifort flags 'return' in 'program main' as error
/sandbox/petsc/petsc.clone-2/src/sys/examples/tutorials/ex4f90.F90(42): error #6353: A RETURN statement is invalid in the main program. call MPI_Comm_size(PETSC_COMM_WORLD,size,ierr);if (ierr .ne. 0) then ; call PetscError(PETSC_COMM_SELF,ierr,PETSC_ERROR_REPEAT,PETSC_NULL_CHARACTER); return; endif
And attempt to shorten the macros by using PetscErrorF() subroutine
And fix all examples to use SETERRA/CHKERRA in main program (instead of SETERRQ/CHKERRQ)
Note: CHKERRA are different from CHKERRABORT on the C interface - as it does not take 'comm' option
show more ...
|