From 51594b80379a4fe242512094677f406df0ca50a7 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Daniel=20Kochma=C5=84ski?= <daniel@turtleware.eu>
Date: Thu, 11 Apr 2019 19:16:31 +0200
Subject: [PATCH] complex-float: print like any other complex number

During printing we cons new floats for imag and real part. We could
opencode that but that would add a lot of code for a little gain. If
this proves to be a real bottleneck we will refactor float printing.
---
 src/c/printer/write_ugly.d | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/c/printer/write_ugly.d b/src/c/printer/write_ugly.d
index d117920d1..30ce3dfa3 100644
--- a/src/c/printer/write_ugly.d
+++ b/src/c/printer/write_ugly.d
@@ -137,11 +137,11 @@ write_complex_float(cl_object f, cl_object stream)
   default:
     break;
   }
-  writestr_stream("#<CF(", stream);
+  writestr_stream("#C(", stream);
   si_write_ugly_object(real, stream);
   ecl_write_char(' ', stream);
   si_write_ugly_object(imag, stream);
-  writestr_stream(")>", stream);
+  writestr_stream(")", stream);
 }
 #endif