Actual source code: cupmcontext.hip.cpp

  1: #include "../cupmcontext.hpp" /*I "petscdevice.h" I*/

  3: PetscErrorCode PetscDeviceContextCreate_HIP(PetscDeviceContext dctx)
  4: {
  5:   static const Petsc::CUPMContextHip  contextHip;
  6:   PetscDeviceContext_(HIP)           *dci;
  7:   PetscErrorCode                      ierr;

 10:   PetscNew(&dci);
 11:   dctx->data = static_cast<void*>(dci);
 12:   PetscMemcpy(dctx->ops,&contextHip.ops,sizeof(contextHip.ops));
 13:   return(0);
 14: }