[petsc-dev] PGI errors with Fortran strings

[Satish Balay]

> PETSC_EXTERN void dmswarmgetfield_(DM *dm, char *name, PetscInt *blocksize, PetscDataType *type, F90Array1d *ptr, int *ierr, PETSC_FORTRAN_CHARLEN_T lenN PETSC_F90_2PTR_PROTO(ptrd))

I don't see an example [in current code] for using both char and F90Array with the same function. So its not clear to me if the above is correct or if it should be:

PETSC_EXTERN void dmswarmgetfield_(DM *dm, char *name, PetscInt *blocksize, PetscDataType *type, F90Array1d *ptr, int *ierr lenN PETSC_F90_2PTR_PROTO(ptrd), PETSC_FORTRAN_CHARLEN_T)

And to disable:

src/ksp/ksp/tutorials/ex54f.F90:!      requires: !pgf90_compiler
src/snes/tests/ex18f90.F90:!     requires: !pgf90_compiler

Satish

On Tue, 7 Jul 2020, Mark Adams wrote:

> DMSwarm has custom fortran wrappers in ftn-custom and f90-custom. I am
> finding that the f90 one has junk in the string length with PGI compilers
> (see attached). The ones in ftn-custom seem to work.
> 
> Any ideas?
> 
> Also, how can I disable a test for PGI?
> 
> Thanks,
> Mark
>