Avoid using ∾ to join units in BQN sources

1 files changed, 2 insertions, 2 deletions

diff --git a/src/f.bqn b/src/f.bqn
index 707b7d7d..52ea46ce 100644
--- a/src/f.bqn
+++ b/src/f.bqn
@@ -50,7 +50,7 @@
     s ← ≢¨ 𝕩
     w ← (0<=)◶⟨⥊,⌈˝⍟(=-1˙)⟩1⊑¨s
     h ← ⌈˝⎉1⍟(0<=) ⊑¨s
-    o ← <∘∾⎉2 ≍⍟(0⌈2-=) (h ∾⌜ 𝕨×w¬(-𝕨×≠w)↑1) ↑¨ 𝕩
+    o ← <∘∾⎉2 ≍⍟(0⌈2-=) (h ≍⌜ 𝕨×w¬(-𝕨×≠w)↑1) ↑¨ 𝕩
     2 PadH (1⊸⌽⊸≡⥊h)◶⟨PadVMixed,PadV∘>⟩ o
   }
 
@@ -60,13 +60,13 @@
 
   FmtSimple ← (≠(0⊸<+≤)+´)∘(⥊<@˙)◶{ # Depth 1
     # All characters
+    r ← =𝕩 ⋄ 𝕩 ↩ 0↓𝕩
     k ← ∞⍟(0⊸=) -≠ c ← ¯1↓≢𝕩
     q ← '"'
     # Escape quotes in strings (rank 1) and substitute control chars
     # with control pictures for other ranks.
     CSub ← { 𝕩 + (𝕩(=×'␡'-⊢)@+127) + ('␀'-@)×𝕩<@+32 }
     𝕩 ↩ (1≠=)◶⟨(1+q=⊢)⊸/,Csub⟩ 𝕩
-    r ← =𝕩
     (r Enframe 1 PadH PadV)⍟(1≠r) ≍ (q⌾⊑c⥊(¯1⊑1∾c)↑'·') ∾⎉k 𝕩 ∾⎉k c-⊸↑q
   }‿{
     # Not homogeneous, or empty