<html><head><meta http-equiv="Content-Type" content="text/html; charset=us-ascii"></head><body style="word-wrap: break-word; -webkit-nbsp-mode: space; line-break: after-white-space;" class=""><div class=""><br class=""></div> The fix for this is to add PetscObjectSetName() to src/sys/f90-mod/petscsys.h90 with the * notation to allow any type. You will see in that file PetscObjectReference() etc.<div class=""><br class=""></div><div class=""> PetsFE is an INTEGER(8) in Fortran because no one has updated it yet to be a Fortran type. You will see in include/petsc/finclude/petscdm.h that only DM has be properly updated to be a Fortran type, a bunch of others are still treated as integers and need to be fixed eventually.</div><div class=""><br class=""></div><div class=""><div class="">#define DM type(tDM)</div><div class=""><br class=""></div><div class="">#define DMAdaptor PetscFortranAddr</div><div class="">#define PetscQuadrature PetscFortranAddr</div><div class="">#define PetscDS PetscFortranAddr</div><div class="">#define PetscFE PetscFortranAddr</div><div class="">#define PetscSpace PetscFortranAddr</div><div class="">#define PetscDualSpace PetscFortranAddr</div><div class="">#define PetscFV PetscFortranAddr</div><div class="">#define PetscLimiter PetscFortranAddr</div><div class="">#define PetscPartitioner PetscFortranAddr</div><div class="">#define DMField PetscFortranAddr</div><div class=""><br class=""></div><div class=""><br class=""></div><div class=""><br class=""></div><div><br class=""><blockquote type="cite" class=""><div class="">On Jul 10, 2020, at 9:57 AM, Mark Adams <<a href="mailto:mfadams@lbl.gov" class="">mfadams@lbl.gov</a>> wrote:</div><br class="Apple-interchange-newline"><div class=""><div dir="ltr" class=""><div class="gmail_quote"><blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left:1px solid rgb(204,204,204);padding-left:1ex"><br class="">
I suspect you have upgraded gfortran and now have gfortran version 10, </blockquote><div class=""><br class=""></div><div class="">09:35 knepley/feature-swarm-fortran= ~/Codes/petsc$ mpif90 --version<br class="">GNU Fortran (Homebrew GCC 10.1.0) 10.1.0<br class=""></div><div class=""> </div><blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left:1px solid rgb(204,204,204);padding-left:1ex">which is pickier about argument matching.<br class="">
<br class="">
If you add -fallow-argument-mismatch to the fortran flags, do things go away?<br class="">
<br class=""></blockquote><div class=""><br class=""></div><div class="">Well, it turns 6 errors into 2 warnings:</div><div class=""><br class=""></div><div class=""> FC arch-macosx-gnu-g/tests/dm/impls/swarm/tutorials/ex1f90.o<br class="">/Users/markadams/Codes/petsc/src/dm/impls/swarm/tutorials/ex1f90.F90:39:30:<br class=""><br class=""> 34 | call PetscObjectSetName(dm, 'Potential Grid', ierr);CHKERRA(ierr)<br class=""> | 2<br class="">......<br class=""> 39 | call PetscObjectSetName(fe, 'fe', ierr);CHKERRA(ierr)<br class=""> | 1<br class="">Warning: Type mismatch between actual argument at (1) and actual argument at (2) (INTEGER(8)/TYPE(tdm)).<br class=""> FLINKER arch-macosx-gnu-g/tests/dm/impls/swarm/tutorials/ex1f90<br class=""> TEST arch-macosx-gnu-g/tests/counts/dm_impls_swarm_tutorials-ex1f90_0.counts<br class=""> ok dm_impls_swarm_tutorials-ex1f90_0<br class=""> ok diff-dm_impls_swarm_tutorials-ex1f90_0<br class=""></div><div class=""><br class=""></div><div class="">Oh well, I guess we need to add this param if we want to set names and take it out of regression tests.</div><div class=""><br class=""></div><div class="">I wonder why it seems to say a PetsFE is an INTEGER(8) ...</div><div class=""><br class=""></div><div class="">Thanks,</div><div class="">Mark</div><div class=""> </div><blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left:1px solid rgb(204,204,204);padding-left:1ex">
Lawrenmce</blockquote></div></div>
</div></blockquote></div><br class=""></div></body></html>