1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79
|
//@HEADER
// ************************************************************************
//
// Kokkos v. 4.0
// Copyright (2022) National Technology & Engineering
// Solutions of Sandia, LLC (NTESS).
//
// Under the terms of Contract DE-NA0003525 with NTESS,
// the U.S. Government retains certain rights in this software.
//
// Part of Kokkos, under the Apache License v2.0 with LLVM Exceptions.
// See https://kokkos.org/LICENSE for license information.
// SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
//
//@HEADER
#include <Kokkos_Core.hpp>
#include <Kokkos_Graph.hpp>
#include <gtest/gtest.h>
namespace {
struct InitTag {};
struct WorkTag {};
template <typename ViewType>
struct TestFunctor {
ViewType data;
static_assert(ViewType::rank() == 0);
static_assert(
std::is_same_v<typename ViewType::value_type, Kokkos::complex<double>>);
template <typename T>
KOKKOS_FUNCTION void operator()(const InitTag, const T) const {
data() = Kokkos::complex<double>{0., 0.};
}
template <typename T>
KOKKOS_FUNCTION void operator()(const WorkTag, const T) const {
Kokkos::atomic_add(&data(), Kokkos::complex<double>{1., 1.});
}
};
// This test serves to ensure that lock-based atomic operations work in
// a graph on device. In particular, this test serves to ensure that the
// lock arrays needed for such operations be on device.
TEST(TEST_CATEGORY, graph_lock_based_atomic_op) {
TEST_EXECSPACE ex{};
// Don't initialize here to avoid that the initialization triggers a kernel
// launch that ensures that the lock arrays are on device. We want to make
// sure they are on device even without a preceding kernel launch.
Kokkos::View<Kokkos::complex<double>, TEST_EXECSPACE> result(
Kokkos::view_alloc(Kokkos::WithoutInitializing));
auto graph = Kokkos::Experimental::create_graph(ex, [&](const auto& root) {
root.then_parallel_for(
Kokkos::RangePolicy<TEST_EXECSPACE, InitTag>(0, 1),
TestFunctor<Kokkos::View<Kokkos::complex<double>, TEST_EXECSPACE>>{
result})
.then_parallel_for(
Kokkos::RangePolicy<TEST_EXECSPACE, WorkTag>(0, 100),
TestFunctor<Kokkos::View<Kokkos::complex<double>, TEST_EXECSPACE>>{
result});
});
graph.submit(ex);
// Check.
Kokkos::complex<double> result_h;
Kokkos::deep_copy(ex, result_h, result);
ex.fence();
ASSERT_FLOAT_EQ(result_h.real(), 100.);
ASSERT_FLOAT_EQ(result_h.imag(), 100.);
}
} // end namespace
|