[petsc-dev] Fortran strings

Mark Adams mfadams at lbl.gov
Tue May 31 07:34:10 CDT 2016


Wrapper code like this does is not working for Robert:

subroutine my_PetscOptionsClearValue(value,ierr)
  use petscsys
  implicit none
  character(len=250), intent(in) :: value
  PetscErrorCode, intent(inout) :: ierr

#if PETSC_VERSION_LT(3,7,0)
  call PetscOptionsClearValue(value,ierr)
#else
  call PetscOptionsClearValue(PETSC_NULL_OBJECT,value,ierr)
#endif

Direct calls to PetscOptionsClearValue work, but calling through his
wrapper does not seem to do anything. Is Fortran doing something funny with
strings here?

Mark
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.mcs.anl.gov/pipermail/petsc-dev/attachments/20160531/95a1c0bd/attachment.html>


More information about the petsc-dev mailing list