From 3f9d7bca22e9d689881dcb195f1091a1175a2ed0 Mon Sep 17 00:00:00 2001 From: Cedric Nugteren Date: Sun, 19 May 2019 14:00:18 +0200 Subject: Fixed a bug in the absolute-min index kernel --- src/kernels/level1/xamax.opencl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/kernels') diff --git a/src/kernels/level1/xamax.opencl b/src/kernels/level1/xamax.opencl index 27add015..e65acf17 100644 --- a/src/kernels/level1/xamax.opencl +++ b/src/kernels/level1/xamax.opencl @@ -41,7 +41,7 @@ void Xamax(const int n, const int num_groups = get_num_groups(0); // Performs loading and the first steps of the reduction - #if defined(ROUTINE_MAX) || defined(ROUTINE_MIN) // non-absolute version + #if defined(ROUTINE_MAX) || defined(ROUTINE_MIN) || defined(ROUTINE_AMIN) singlereal max = SMALLEST; #else singlereal max = ZERO; -- cgit v1.2.3