From 7a21316c1017ca2e0fac56c12c43b96e81deb755 Mon Sep 17 00:00:00 2001
From: alex-eg <alexey.e.egorov@gmail.com>
Date: Wed, 22 Oct 2025 22:27:50 +0300
Subject: [PATCH] fix designated initializer assignment producing extra parens

---
 fmt-c.scm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/fmt-c.scm b/fmt-c.scm
index f4ccd56..7828762 100644
--- a/fmt-c.scm
+++ b/fmt-c.scm
@@ -85,7 +85,8 @@
 (define (c-maybe-paren op x)
   (lambda (st)
     ((fmt-let 'op op
-              (if (c-op<= (fmt-op st) op)
+              (if (and (c-op<= (fmt-op st) op)
+                       (not (vector? st)))
                   (c-paren x)
                   x))
      st)))