log: Try to print s-expressions in a more compact format.

* src/misc.c (count_closing_parens): New.
(_gcry_log_printsxp): Use new function.
* mpi/ec.c (_gcry_mpi_point_log): Take care of a NULL point.

Signed-off-by: Werner Koch <wk@gnupg.org>

1 files changed, 6 insertions, 0 deletions

diff --git a/mpi/ec.c b/mpi/ec.c
index c6d0fc8c..de681a10 100644
--- a/mpi/ec.c
+++ b/mpi/ec.c
@@ -42,6 +42,12 @@ _gcry_mpi_point_log (const char *name, mpi_point_t point, mpi_ec_t ctx)
   gcry_mpi_t x, y;
   char buf[100];
 
+  if (!point)
+    {
+      snprintf (buf, sizeof buf - 1, "%s.*", name);
+      log_mpidump (buf, NULL);
+      return;
+    }
   snprintf (buf, sizeof buf - 1, "%s.X", name);
 
   if (ctx)