aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorMarshall Lochbaum <mwlochbaum@gmail.com>2021-11-27 22:09:32 -0500
committerMarshall Lochbaum <mwlochbaum@gmail.com>2021-11-27 22:09:32 -0500
commitb2df3496227d2d7ebe1363fad0bafbfcb2a6efb4 (patch)
tree89df6065aaaf35a15bb87c48e0316168ed65a618 /src
parentabf923ff1b2d6ffb4bff66a04f83ec8843b3d826 (diff)
Check for export statement used as predicate ⇐?
Diffstat (limited to 'src')
-rw-r--r--src/c.bqn1
1 files changed, 1 insertions, 0 deletions
diff --git a/src/c.bqn b/src/c.bqn
index 92af4899..a4e6d011 100644
--- a/src/c.bqn
+++ b/src/c.bqn
@@ -141,6 +141,7 @@ Parse ← {r‿vn‿i‿e‿def←𝕨⋄nv←≠vn
dl←«⊸∨dc←r=4 # Dot left
r-↩(𝕩=⊑bG)>ec←«dc<0≤r+p # Role ¯4 for exports: ⊑bG is ⇐
"Invalid assignment or stranding use"_err_(↕≠) ((¯4⊸<∧≤⟜¯2)r)>(ec∨𝕩=2+⊑bG)∧»dc<0≤r
+ "Can't use export statement as predicate"_err_(↕≠) (»¯4=r)∧𝕩=pred
"Dot must be followed by a name"_err_(↕≠) dc>«𝕩 M vi‿nv
sr←»⌾(((⍋⊏⟜dl)⊸⊏g)⊸⊏)sl←«⊸∨r=¯2⋄ns←¬sl∨sr # Strand right and left; not stranded
cp←𝕩=1+⊑bB # Closed paren