@@ -164,11 +164,11 @@ END FUNCTION dc_memcpy_d2d_cu
164
164
165
165
! *****************************************************************************
166
166
!> \brief Ensures that given devmem has at least the requested size.
167
- !> \param this ...
168
- !> \param stream on which zeroing and memcopying is performed
169
- !> \param requested_size_in_bytes ...
170
- !> \param nocopy if after growin old content should NOT be copied over. default: false.
171
- !> \param zero_pad if after growing the new memory should be zeroed. default : false.
167
+ !> \param[ in , out ] this device memory
168
+ !> \param[ in ] stream on which zeroing and memcopying is performed
169
+ !> \param[ in ] requested_size_in_bytes requested size in bytes
170
+ !> \param[ in ] (optional) nocopy if after growin old content should NOT be copied over. Default: false.
171
+ !> \param[ in ] (optional) zero_pad if after growing the new memory should be zeroed. Default : false.
172
172
!> \author Ole Schuett
173
173
! *****************************************************************************
174
174
SUBROUTINE acc_devmem_ensure_size_bytes (this , stream , requested_size_in_bytes , nocopy , zero_pad )
@@ -227,8 +227,8 @@ END SUBROUTINE acc_devmem_ensure_size_bytes
227
227
228
228
! *****************************************************************************
229
229
!> \brief Returns a logical , which indicates if the given devmem is allocated.
230
- !> \param this ...
231
- !> \retval res ...
230
+ !> \param[ in ] this device memory
231
+ !> \retval res true if device memory is allocated, false otherwise
232
232
!> \author Ole Schuett
233
233
! *****************************************************************************
234
234
FUNCTION acc_devmem_allocated (this ) RESULT(res)
@@ -241,8 +241,8 @@ END FUNCTION acc_devmem_allocated
241
241
242
242
! *****************************************************************************
243
243
!> \brief Returns size of given devmem in terms of item count (not bytes!)
244
- !> \param this ...
245
- !> \retval res ...
244
+ !> \param[ in ] this device memory
245
+ !> \retval res size of device memory (item count)
246
246
!> \author Ole Schuett
247
247
! *****************************************************************************
248
248
FUNCTION acc_devmem_size_in_bytes (this ) RESULT(res)
@@ -256,9 +256,9 @@ END FUNCTION acc_devmem_size_in_bytes
256
256
257
257
258
258
! *****************************************************************************
259
- !> \brief Returns C- pointer to data of give devmem.
260
- !> \param this ...
261
- !> \retval res ...
259
+ !> \brief Returns C- pointer to data of given devmem.
260
+ !> \param[ in ] this device memory
261
+ !> \retval res false (accelerator support is not enabled)
262
262
!> \author Ole Schuett
263
263
! *****************************************************************************
264
264
#if ! defined (__ACC)
@@ -270,9 +270,10 @@ FUNCTION acc_devmem_cptr(this) RESULT(res)
270
270
END FUNCTION acc_devmem_cptr
271
271
#else
272
272
! *****************************************************************************
273
- !> \brief ...
274
- !> \param this ...
275
- !> \retval res ...
273
+ !> \brief Returns C- pointer to data of given devmem.
274
+ !> \param[in ] this device memory
275
+ !> \retval res C- pointer to data of given devmem
276
+ !> \author Ole Schuett
276
277
! *****************************************************************************
277
278
FUNCTION acc_devmem_cptr (this ) RESULT(res)
278
279
TYPE(acc_devmem_type), INTENT (IN ) :: this
@@ -286,8 +287,8 @@ END FUNCTION acc_devmem_cptr
286
287
287
288
! *****************************************************************************
288
289
!> \brief Fortran- wrapper for cudaMemGetInfo.
289
- !> \param free ...
290
- !> \param avail ...
290
+ !> \param[ out ] free free device memory
291
+ !> \param[ out ] avail available device memory
291
292
!> \author Ole Schuett
292
293
! *****************************************************************************
293
294
SUBROUTINE acc_devmem_info (free , avail )
@@ -305,8 +306,8 @@ END SUBROUTINE acc_devmem_info
305
306
306
307
! *****************************************************************************
307
308
!> \brief Allocates a given devmem.
308
- !> \param this ...
309
- !> \param size_in_bytes ...
309
+ !> \param[ in , out ] this device memory
310
+ !> \param[ in ] size_in_bytes size in bytes
310
311
!> \author Ole Schuett
311
312
! *****************************************************************************
312
313
SUBROUTINE acc_devmem_allocate_bytes (this , size_in_bytes )
@@ -333,7 +334,7 @@ END SUBROUTINE acc_devmem_allocate_bytes
333
334
334
335
! *****************************************************************************
335
336
!> \brief Deallocates a given devmem.
336
- !> \param this ...
337
+ !> \param[ in , out ] this device memory
337
338
!> \author Ole Schuett
338
339
! *****************************************************************************
339
340
SUBROUTINE acc_devmem_deallocate (this )
@@ -361,10 +362,10 @@ END SUBROUTINE acc_devmem_deallocate
361
362
362
363
! *****************************************************************************
363
364
!> \brief Sets entries in given devmem to zero, asynchronously.
364
- !> \param this ...
365
- !> \param first_byte begin of region to zero, defaults to 1 if not given.
366
- !> \param last_byte end of region to zero, defaults to size if not given.
367
- !> \param stream on which zeroing is performed.
365
+ !> \param[ in , out ] this device memory
366
+ !> \param[ in ] (optional) first_byte begin of region to zero, defaults to 1 if not given.
367
+ !> \param[ in ] (optional) last_byte end of region to zero, defaults to size if not given.
368
+ !> \param[ in ] stream stream on which zeroing is performed.
368
369
!> \author Ole Schuett
369
370
! *****************************************************************************
370
371
SUBROUTINE acc_devmem_setzero_bytes (this , first_byte , last_byte , stream )
@@ -400,10 +401,10 @@ END SUBROUTINE acc_devmem_setzero_bytes
400
401
401
402
! *****************************************************************************
402
403
!> \brief Helper- routine performing actuall host2dev transfers.
403
- !> \param this ...
404
- !> \param hostmem_cptr ...
405
- !> \param n_bytes ...
406
- !> \param stream ...
404
+ !> \param[ in ] this device memory
405
+ !> \param hostmem_cptr host memory
406
+ !> \param[ in ] n_bytes number of bytes
407
+ !> \param[ in ] stream stream used for memory transfer
407
408
!> \author Ole Schuett
408
409
! *****************************************************************************
409
410
#if defined (__ACC)
@@ -433,10 +434,10 @@ END SUBROUTINE host2dev_raw
433
434
434
435
! *****************************************************************************
435
436
!> \brief Helper- routine performing actual dev2host transfers.
436
- !> \param this ...
437
- !> \param hostmem_cptr ...
438
- !> \param n_bytes ...
439
- !> \param stream ...
437
+ !> \param[ in ] this device memory
438
+ !> \param hostmem_cptr host memory
439
+ !> \param[ in ] n_bytes number of bytes
440
+ !> \param[ in ] stream stream used for memory transfer
440
441
!> \author Ole Schuett
441
442
! *****************************************************************************
442
443
#if defined (__ACC)
0 commit comments