[petsc-dev] new Fortran error

[Lawrence Mitchell]

> On 10 Jul 2020, at 13:53, Mark Adams <mfadams at lbl.gov> wrote:
> 
> I just started getting this error and I have no idea what it from. Any ideas?
> 
> 08:52 knepley/feature-swarm-fortran= ~/Codes/petsc$ make -f gmakefile test search='dm_impls_swarm_tutorials-ex1f90_0' 
> Using MAKEFLAGS: search=dm_impls_swarm_tutorials-ex1f90_0
>           FC arch-macosx-gnu-g/tests/dm/impls/swarm/tutorials/ex1f90.o
> /Users/markadams/Codes/petsc/src/dm/impls/swarm/tutorials/ex1f90.F90:39:30:
> 
>    34 |       call PetscObjectSetName(dm, 'Potential Grid', ierr);CHKERRA(ierr)
>       |                              2
> ......
>    39 |       call PetscObjectSetName(fe, 'fe', ierr);CHKERRA(ierr)
>       |                              1
> Error: Type mismatch between actual argument at (1) and actual argument at (2) (INTEGER(8)/TYPE(tdm)).
> /Users/markadams/Codes/petsc/src/dm/impls/swarm/tutorials/ex1f90.F90:71:30:
> 
>    34 |       call PetscObjectSetName(dm, 'Potential Grid', ierr);CHKERRA(ierr)
>       |                              2
> ......
>    71 |       call PetscObjectSetName(rho, 'rho', ierr);CHKERRA(ierr)
>       |                              1
> Error: Type mismatch between actual argument at (1) and actual argument at (2) (TYPE(tvec)/TYPE(tdm)).
> /Users/markadams/Codes/petsc/src/dm/impls/swarm/tutorials/ex1f90.F90:73:30:
> 
>    34 |       call PetscObjectSetName(dm, 'Potential Grid', ierr);CHKERRA(ierr)
>       |                              2
> ......
>    73 |       call PetscObjectSetName(f, 'weights', ierr);CHKERRA(ierr)
>       |                              1

I suspect you have upgraded gfortran and now have gfortran version 10, which is pickier about argument matching.

If you add -fallow-argument-mismatch to the fortran flags, do things go away?

Lawrenmce