From 2295a7b91fbe39f821717bffdbf0a83275554ac4 Mon Sep 17 00:00:00 2001 From: Martin Kroeker Date: Wed, 31 Jul 2024 19:00:31 +0200 Subject: [PATCH] Update zscal.c --- kernel/zarch/zscal.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/kernel/zarch/zscal.c b/kernel/zarch/zscal.c index 853e4931c..eebae44c5 100644 --- a/kernel/zarch/zscal.c +++ b/kernel/zarch/zscal.c @@ -381,7 +381,7 @@ int CNAME(BLASLONG n, BLASLONG dummy0, BLASLONG dummy1, FLOAT da_r, FLOAT da_i, x[i + 1] = da_i * x[i]; else x[i + 1] = NAN; - //if (isfinite(x[i])) + if (isfinite(x[i])) x[i] = temp0; i += 2; j++;