[petsc-users] error using GetType in FORTRAN

Mark Adams mfadams at lbl.gov
Fri Apr 17 16:37:40 CDT 2015


It looks like fieldsplitf.c has an extra PetscToPointer.  type is already a
pointer:

PETSC_EXTERN void PETSC_STDCALL  pcfieldsplitgettype_(PC pc,PCCompositeType
*type, int *__ierr ){
*__ierr = PCFieldSplitGetType(
    (PC)PetscToPointer((pc) ),
    (PCCompositeType* )PetscToPointer((type) ));
}

On Fri, Apr 17, 2015 at 4:12 PM, Barry Smith <bsmith at mcs.anl.gov> wrote:

>
>    Likely need to run in the debugger to see what generates the error.
> Perhaps a missing ierr?
>
> Barry
>
>
> > On Apr 17, 2015, at 9:10 AM, Mark Adams <mfadams at lbl.gov> wrote:
> >
> > I declare
> >
> >   PCCompositeType::pcctype
> >
> > But PCFieldSplitGetType does not seem to like it?
> >
> > Mark
> >
> > [1]PETSC ERROR: --------------------- Error Message
> --------------------------------------------------------------
> > [1]PETSC ERROR: Invalid pointer
> > [1]PETSC ERROR: Invalid Pointer to Int: Parameter # 2
> > [1]PETSC ERROR: See http://www.mcs.anl.gov/petsc/documentation/faq.html
> for trouble shooting.
> > [1]PETSC ERROR: Petsc Development GIT revision: v3.5.3-2702-g1f714da
> GIT Date: 2015-04-16 11:32:06 -0500
> > [1]PETSC ERROR: ../../XGC1_3/xgc-em on a arch-macosx-gnu-g named
> MacBook-Pro.local by markadams Fri Apr 17 10:06:09 2015
> > [1]PETSC ERROR: Configure options --download-hypre=1 --download-p4est
> --download-superlu=1 --download-mumps --download-scalapack
> --download-superlu_dist=1 --download-parmetis=1 --download-metis=1
> --download-triangle=1 --with-hdf5-dir=/Users/markadams/Codes/hdf5
> --with-x=0 --with-debugging=1 PETSC_ARCH=arch-macosx-gnu-g
> > [1]PETSC ERROR: #1 PCFieldSplitGetType() line 2046 in
> /Users/markadams/Codes/petsc/src/ksp/pc/impls/fieldsplit/fieldsplit.c
> >
>
>
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.mcs.anl.gov/pipermail/petsc-users/attachments/20150417/9599fedf/attachment.html>


More information about the petsc-users mailing list