Searched refs:PETSC_SMALLEST_FORTRAN_CALLBACK (Results 1 – 5 of 5) sorted by relevance
79 if (!subtype) *id = PETSC_SMALLEST_FORTRAN_CALLBACK + base->basecount++; in PetscFortranCallbackRegister()92 link->max = PETSC_SMALLEST_FORTRAN_CALLBACK; in PetscFortranCallbackRegister()99 … base->maxsubtypecount = PetscMax(base->maxsubtypecount,link->max-PETSC_SMALLEST_FORTRAN_CALLBACK); in PetscFortranCallbackRegister()
218 if (*cid >= PETSC_SMALLEST_FORTRAN_CALLBACK+obj->num_fortrancallback[cbtype]) { in PetscObjectSetFortranCallback()228 obj->fortrancallback[cbtype][*cid-PETSC_SMALLEST_FORTRAN_CALLBACK].func = func; in PetscObjectSetFortranCallback()229 obj->fortrancallback[cbtype][*cid-PETSC_SMALLEST_FORTRAN_CALLBACK].ctx = ctx; in PetscObjectSetFortranCallback()257 …if (PetscUnlikely(cid < PETSC_SMALLEST_FORTRAN_CALLBACK)) SETERRQ(obj->comm,PETSC_ERR_ARG_CORRUPT,… in PetscObjectGetFortranCallback()258 …if (PetscUnlikely(cid >= PETSC_SMALLEST_FORTRAN_CALLBACK+obj->num_fortrancallback[cbtype])) SETERR… in PetscObjectGetFortranCallback()259 cb = &obj->fortrancallback[cbtype][cid-PETSC_SMALLEST_FORTRAN_CALLBACK]; in PetscObjectGetFortranCallback()
57 #define PETSC_SMALLEST_FORTRAN_CALLBACK ((PetscFortranCallbackId)1000) macro
12589 #define PETSC_SMALLEST_FORTRAN_CALLBACK 57,2424
23025 PETSC_SMALLEST_FORTRAN_CALLBACK include/petsc/private/petscimpl.h 57;" d language:C++