diff options
| author | Marshall Lochbaum <mwlochbaum@gmail.com> | 2020-10-07 21:48:59 -0400 |
|---|---|---|
| committer | Marshall Lochbaum <mwlochbaum@gmail.com> | 2020-10-07 22:19:30 -0400 |
| commit | 3ee0c34c13c1f80429915eace1b783a899e36042 (patch) | |
| tree | b31fb5f4b92407bc994863f46dcc957bf71dcb24 /src | |
| parent | 860182712160ee17d194c2ab65a25744eecdab03 (diff) | |
Use aa (assignment target region) to suppress function application directly, not to modify the role
Diffstat (limited to 'src')
| -rw-r--r-- | src/c.bqn | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -141,9 +141,9 @@ Parse ← {r‿nv←𝕨 ma←tr<(𝕩=1+⊑bG)∧«ir≥1 os←↕∘≠⊸(⊣-T)⌾⌽¬ro∨ma⋄at←1+⊏⟜os⊸+/a "Role of the two sides in assignment must match" ! (⊏⟜er≡⊏⟜r)at - r(×⟜¬-⊢)↩aa←g⊏asn←»+`gi⊏«⊸-(≠𝕩)↑/⁼at + aa←g⊏asn←»+`gi⊏«⊸-(≠𝕩)↑/⁼at ta←tr∧2(>∨|)ps(⊢-T)+`¬ro - fa←/(ta∨ro∨«aa)<(r=1)∨»op + fa←/(ta∨ro∨«⊸∨aa)<(r=1)∨»op dy←fa⊏«(𝕩=⊑bO)<(tr∧r≥0)∨ro<r=0 ob←pr⊏/¯1(⊢-»)u←⍷∧pr←𝕩⊏˜pi←/𝕩<sep cn←pi∾lt←/𝕩≥ci←vi+nv⋄ob∾↩(ci-˜≠u)+lt⊏𝕩 |