From fc30c62ea09b0eb2e99280d05554ce99e0bd83e5 Mon Sep 17 00:00:00 2001
From: Marius Gerbershagen <marius.gerbershagen@gmail.com>
Date: Mon, 2 Jan 2023 17:11:54 +0100
Subject: [PATCH] numbers/log.d: fix typo

---
 src/c/numbers/log.d | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/c/numbers/log.d b/src/c/numbers/log.d
index 8e8908ef2..ebe6cd464 100644
--- a/src/c/numbers/log.d
+++ b/src/c/numbers/log.d
@@ -348,7 +348,7 @@ static cl_object
 ecl_log1_complex_long_precision(cl_object x)
 {
 #ifdef ECL_COMPLEX_FLOAT
-  cl_object result = ecl_alloc_object(t_cdfloat);
+  cl_object result = ecl_alloc_object(t_clfloat);
   long double _Complex fc = ecl_to_long_double(x->gencomplex.real) + I * ecl_to_long_double(x->gencomplex.real);
   ecl_clfloat(result) = clogl(fc);
   return result;