From 234bba3810ebb65d9b61934533bd676e2dce7d90 Mon Sep 17 00:00:00 2001 From: Martin Kroeker Date: Sun, 25 May 2025 00:16:57 +0200 Subject: [PATCH] Update cscal.c --- kernel/zarch/cscal.c | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) diff --git a/kernel/zarch/cscal.c b/kernel/zarch/cscal.c index b443b31de..a40b0789a 100644 --- a/kernel/zarch/cscal.c +++ b/kernel/zarch/cscal.c @@ -337,8 +337,12 @@ int CNAME(BLASLONG n, BLASLONG dummy0, BLASLONG dummy1, FLOAT da_r, FLOAT da_i, if (da_r == 0.0) if (da_i == 0 && dummy2 == 0) cscal_kernel_16_zero(n1, x); - else + else { + if (dummy2 == 0) cscal_kernel_16_zero_r(n1, alpha, x); + else + cscal_kernel_16(n1, alpha, x); + } else if (da_i == 0 && !isnan(da_r)) cscal_kernel_16_zero_i(n1, alpha, x); else