From bdf277e9acaa6f77b55c1a1331416f6e1d8e47a9 Mon Sep 17 00:00:00 2001
From: Marshall Lochbaum <mwlochbaum@gmail.com>
Date: Tue, 6 Oct 2020 14:15:27 -0400
Subject: Check for non-expressions on either side of assignment or strands

---
 src/c.bqn | 1 +
 1 file changed, 1 insertion(+)

(limited to 'src')

diff --git a/src/c.bqn b/src/c.bqn
index 80b7d94f..691fb6a7 100644
--- a/src/c.bqn
+++ b/src/c.bqn
@@ -111,6 +111,7 @@ Parse ← {r‿nv←𝕨
   "Swapped open and closed brackets" ! 0≤(⊑g)⊑pd
   "Parentheses can't contain separators" ! ¬∨´((⊑bB)⊸=/·«sep⊸=)gp/gx
   "Empty statement or expression" ! ∧´(4+⊑bB)=(1⊸«⊸∧1∾gp)/0∾gx
+  "Invalid assignment or stranding use" ! ∧´(r≤¯2)/r»⊸∧⟜«○(0⊸≤)r+p
   rp←¬g⍋⊸⊏(pp>0)(/{𝕨⌾((pp<0)⊸/)𝕩}∧)(«⊢<1⊸«)⊸∧g⊏p>0
   𝕩/˜↩rp⋄r/˜↩rp⋄g↩⍋+`p↩rp/p
   sr←»⌾(g⊸⊏)sl←«⊸∨r=¯2⋄cp←𝕩=1+⊑bB
-- 
cgit v1.2.3