From cb9b22941fc1ba0d70020c96fb171117fdab5e31 Mon Sep 17 00:00:00 2001
From: Marshall Lochbaum <mwlochbaum@gmail.com>
Date: Wed, 19 May 2021 21:26:11 -0400
Subject: =?UTF-8?q?Fix=20=E2=80=A2Repr=20of=20empty=20arrays?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 src/f.bqn | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'src')

diff --git a/src/f.bqn b/src/f.bqn
index 144540b2..217e471e 100644
--- a/src/f.bqn
+++ b/src/f.bqn
@@ -98,11 +98,11 @@
 
   # Represent as string
   RR ← {Repr𝕩}
-  ReprList ← (⌈´(2‿1‿0»7⥊2)⊏˜Type⌜)◶⟨
+  ReprList ← (0<≠)◶⟨"⟨⟩",(⌈´(2‿1‿0»7⥊2)⊏˜Type⌜)◶⟨
     '"' (⊣∾((1+=)/⊢)∾⊣) ⊢
     1↓·∾("‿"∾ReprAtom)¨
     "⟨"∾"⟩"«·∾(","∾RR)¨
-  ⟩
+  ⟩⟩
   ReprArr ← (2⌊=)◶⟨"<"∾RR∘⊑,ReprList,≢∾⟜"⥊"⊸∾○ReprList⥊⟩
   ReprDat ← (0=Type)◶⟨ReprAtom,ReprArr⟩
   ReprOp ← 1⊑ RR _dispOp_ ("Can't represent block"!0˙)
-- 
cgit v1.2.3