diff options
| author | Marshall Lochbaum <mwlochbaum@gmail.com> | 2021-08-22 16:39:05 -0400 |
|---|---|---|
| committer | Marshall Lochbaum <mwlochbaum@gmail.com> | 2021-08-22 16:39:05 -0400 |
| commit | df6dec5e56f486a5c32c3e671a991e760a402998 (patch) | |
| tree | cad79e65b1cc274d07736ec8494978a162c46590 /src/c.bqn | |
| parent | e32bd0102e192834691780fad7605f0ea7aca69e (diff) | |
Dot is invalid next to strand or assignment
Diffstat (limited to 'src/c.bqn')
| -rw-r--r-- | src/c.bqn | 6 |
1 files changed, 3 insertions, 3 deletions
@@ -134,10 +134,10 @@ Parse ← {r‿vn‿i‿e‿def←𝕨⋄nv←≠vn "Swapped open and closed brackets" ! 0≤(⊑g)⊑pd "Parentheses can't contain separators"_err_(gb/G) ((⊑bB)⊸=»⊸∧sep⊸=)gb/gx {"Empty statement or expression"_err_(𝕩/0∾G) (4+⊑bB)≠𝕩/0∾gx}1⊸«⊸∧1∾gb - r-↩(𝕩=⊑bG)>ec←«0≤r+p # Role ¯4 for exports: ⊑bG is ⇐ - "Invalid assignment or stranding use"_err_(↕∘≠) ((¯4⊸<∧≤⟜¯2)r)>ec∧»0≤r - "Dot must be followed by a name"_err_(↕∘≠) (r=4)>«𝕩 M vi‿nv 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∧»dc<0≤r + "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 nr←(IT¬cp)⊏(𝕩=2+⊑bI)+2×𝕩=⊑bO # Nothingness role: 1 for 𝕨, 2 for · |