MPI call of host offloaded

Hi all,

I have come across a stage where I want to offload a host code to MIC.

However I came across this error.

This is the section of the code I want to offload.

#ifdef CCSMCOUPLED
!  call MPI_BARRIER(POP_Communicator,ierr)
!dir$ offload begin target(mic:0)
   ierr = 13
   call MPI_ABORT(MPI_COMM_WORLD,errorCode, ierr)
!dir$ end offload
#else
!dir$ offload begin target(mic:0)
   call MPI_BARRIER(POP_Communicator, ierr)
   call MPI_ABORT(MPI_COMM_WORLD, errorCode, ierr)
   call MPI_FINALIZE(ierr)
!dir$ end offload
#endif

I got the following error. Is there a work around to this problem otherwise. I want to offload host MPI call to XeonPhi

.