Fortran-wrapper for waiting for work on all streams to complete
SUBROUTINE acc_device_synchronize()
!! Fortran-wrapper for waiting for work on all streams to complete
#if defined (__DBCSR_ACC)
INTEGER :: istat
istat = acc_device_synchronize_cu()
IF (istat /= 0) &
DBCSR_ABORT("acc_device_synchronize failed")
#else
DBCSR_ABORT("__DBCSR_ACC not compiled in")
#endif
END SUBROUTINE acc_device_synchronize