fix designated initializer assignment producing extra parens

2025-10-22 22:27:50 +03:00
parent c517b522ad
commit 3af850b111
1 changed files with 2 additions and 1 deletions
--- 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)))