From 115e85c53b5b5a47c38c9a10b7b5ce6ba0d39b18 Mon Sep 17 00:00:00 2001
From: Marshall Lochbaum <mwlochbaum@gmail.com>
Date: Thu, 30 Dec 2021 21:46:02 -0500
Subject: =?UTF-8?q?Fix=20=E2=80=A2Repr=20of=201-element=20numeric=20list?=
 =?UTF-8?q?=20(can't=20use=20a=20strand)?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 src/f.bqn | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src')

diff --git a/src/f.bqn b/src/f.bqn
index eb68a993..b60643b8 100644
--- a/src/f.bqn
+++ b/src/f.bqn
@@ -100,7 +100,7 @@
   RR ← {Repr𝕩}
   ReprList ← (0<≠)◶⟨"⟨⟩",(⌈´(2‿1‿0»7⥊2)⊏˜Type⌜)◶⟨
     '"' (⊣∾((1+=)/⊢)∾⊣) ⊢
-    1↓·∾("‿"∾ReprAtom)¨
+    (1<≠)◶⟨"⟨"∾"⟩"«∾,1↓∾⟩("‿"∾ReprAtom)¨
     "⟨"∾"⟩"«·∾(","∾RR)¨
   ⟩⟩
   ReprArr ← (2⌊=)◶⟨"<"∾RR∘⊑,ReprList,≢∾⟜"⥊"⊸∾○ReprList⥊⟩
-- 
cgit v1.2.3