From b23efc5846028710a9f38e286e7509d7febd4e8c Mon Sep 17 00:00:00 2001 From: Martin Kroeker Date: Sat, 24 May 2025 17:49:45 +0200 Subject: [PATCH] add handling of dummy2 flag --- kernel/zarch/cscal.c | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/kernel/zarch/cscal.c b/kernel/zarch/cscal.c index e623f306b..e1134347a 100644 --- a/kernel/zarch/cscal.c +++ b/kernel/zarch/cscal.c @@ -205,7 +205,7 @@ int CNAME(BLASLONG n, BLASLONG dummy0, BLASLONG dummy1, FLOAT da_r, FLOAT da_i, if (inc_x != 1) { inc_x <<= 1; - if (da_r == 0.0) { + if (da_r == 0.0 && !dummy2) { BLASLONG n1 = n & -2; @@ -334,7 +334,7 @@ int CNAME(BLASLONG n, BLASLONG dummy0, BLASLONG dummy1, FLOAT da_r, FLOAT da_i, alpha[0] = da_r; alpha[1] = da_i; - if (da_r == 0.0) + if (da_r == 0.0 &&!dummy2) if (da_i == 0) cscal_kernel_16_zero(n1, x); else