diff options
| author | Marshall Lochbaum <mwlochbaum@gmail.com> | 2021-08-09 15:45:13 -0400 |
|---|---|---|
| committer | Marshall Lochbaum <mwlochbaum@gmail.com> | 2021-08-09 15:49:53 -0400 |
| commit | 0d510dc8ba8a5c90abe08cacbe1e16114feb9e40 (patch) | |
| tree | 6f951da19cb9e83078e5d8406e7bd1002cb20b58 /src | |
| parent | 486d4b6ad42f0760102aa34fcd9c37bd4f39491c (diff) | |
Fix immediacy of modifiers with labels
Diffstat (limited to 'src')
| -rw-r--r-- | src/c.bqn | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -174,7 +174,7 @@ Parse ← {r‿vn‿i‿e‿def←𝕨⋄nv←≠vn HS←H((0‿3‿5‿6+⊑bI)⍋𝕩)⊸=⋄sp←/hf<𝕩 M bI # Has-special (𝕤𝕩𝕨/𝕣𝕗/𝕘); indices of specials fx←HS 1⋄fr←(fx∨0⊸<)⊸+ft←2(⊣⌈2×⊢)○HS 3 # Body immediacy ¬fx, type ft, role fr "Invalid special names for block header"_err_(/CB) 1↓ch∧hr<fr - ft⌈↩1-˜fr⌈↩ch×hr⋄fx⌈↩ch∧0<fr + ft⌈↩1-˜fr⌈↩ch×hr⋄fx⌈↩ch∧1=fr "Special name outside of any block"_err_(/{(0=fi)∧𝕩 M bI}∘𝕩) 0<⊑fr "Only blocks with explicit arguments can have multiple bodies"_err_(/CB) 1↓cm>fx "Block bodies must be of the same kind"_err_(/CB) 1↓cf<»⊸≠ft |
