diff options
| author | Marshall Lochbaum <mwlochbaum@gmail.com> | 2021-09-04 21:48:58 -0400 |
|---|---|---|
| committer | Marshall Lochbaum <mwlochbaum@gmail.com> | 2021-09-04 21:48:58 -0400 |
| commit | e74975a9f7c58c3320ce3740a0a10c5253f3c051 (patch) | |
| tree | f10f1d67ca586c26453944bf802ffa38272d8b1d /src | |
| parent | aef66a84319670282f6550904487accdabe674d7 (diff) | |
Allow 𝕩 as a case header
Diffstat (limited to 'src')
| -rw-r--r-- | src/c.bqn | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -177,7 +177,7 @@ Parse ← {r‿vn‿i‿e‿def←𝕨⋄nv←≠vn hm←¬ho∨ha←ho<(0=hr)∧1=hn # Mask for main name; header arguments "Invalid header structure"_err_(hm/HI) 1⊸»⊸=hm/hc hk←3|1-˜(+`bI∾nv)⍋ht←hi⊏𝕩׬rev⊏sr # Kind: 0 special, 1 name, 2 compound - hma←hm>ha+↩hla←hl∧(0=hr)∧2=hk⋄hr+↩hla # Lone non-name subject is 𝕩 with 𝕊 omitted + hma←hm>ha+↩hla←hl∧(0=hr)∧1≠hk⋄hr+↩hla # Lone non-name subject is 𝕩 with 𝕊 omitted hv←(ha×1+hla<«hc)+(ho×4+«3=hr)+hma×3×1-˜2⌊hr # Special name for position "Incorrect special name"_err_(HI) (0=hk)∧ht≠hv+⊑bI hk×↩¬hc∨hl∧0=hr # Treat subject labels like special names |