Actual source code: gcookie.c

  1: #define PETSC_DLL
  2: /*
  3:      Provides utility routines for manulating any type of PETSc object.
  4: */
 5:  #include petscsys.h

  9: /*@C
 10:    PetscObjectGetCookie - Gets the cookie for any PetscObject, 

 12:    Not Collective
 13:    
 14:    Input Parameter:
 15: .  obj - any PETSc object, for example a Vec, Mat or KSP.
 16:          Thus must be cast with a (PetscObject), for example, 
 17:          PetscObjectGetCookie((PetscObject)mat,&cookie);

 19:    Output Parameter:
 20: .  cookie - the cookie

 22:    Level: developer

 24: @*/
 25: PetscErrorCode  PetscObjectGetCookie(PetscObject obj,PetscCookie *cookie)
 26: {
 29:   *cookie = obj->cookie;
 30:   return(0);
 31: }