Test was not doing what it's supposed to do.

2018-06-18 11:05:29 +02:00 · 2018-06-18 11:05:29 +02:00 · fa3653b6e3
parent 83e08840e7
commit fa3653b6e3
1 changed files with 2 additions and 2 deletions
--- a/UtilXlib/tests/test_mp_max_iv_buffer_gpu.f90
+++ b/UtilXlib/tests/test_mp_max_iv_buffer_gpu.f90
@ -19,8 +19,8 @@ PROGRAM test_mp_max_iv_buffer_gpu
    TYPE(tester_t) :: test
    INTEGER :: world_group = 0
    ! test variable
-    REAL(DP), DEVICE :: iv_d(200001)
-    REAL(DP) :: iv_h(200001)
+    INTEGER, DEVICE :: iv_d(200001)
+    INTEGER :: iv_h(200001)
    !
    CALL test%init()