diff options
| author | Marshall Lochbaum <mwlochbaum@gmail.com> | 2020-11-15 10:59:33 -0500 |
|---|---|---|
| committer | Marshall Lochbaum <mwlochbaum@gmail.com> | 2020-11-15 10:59:33 -0500 |
| commit | a6d4a42a64089e9212a742d4abe5157a5c42ff44 (patch) | |
| tree | 90516581cfb84a1de1ccdf39f86a1270d2b0932d /src | |
| parent | 9b8eb9b4a8aead2d75f159ddedec5495ebf6043d (diff) | |
Error checking for non-functions as the combiners in trains
Diffstat (limited to 'src')
| -rw-r--r-- | src/c.bqn | 3 |
1 files changed, 2 insertions, 1 deletions
@@ -175,7 +175,8 @@ Parse ← {r‿vn‿ind←𝕨⋄nv←≠vn idbc←¯1⌽⟨⥊⍉>ib,3¨ed,ex≠⊸(«-⊢)ed,14¨ed⟩ ta←tr∧2(>∨|)ps(⊢-T)+`¬ro - fa←/(ta∨ro∨«⊸∨ps<aa)<(r=1)∨»op + fa←/(fe←ta∨ro∨«⊸∨ps<aa)<ff←(r=1)∨»op + "Second-level parts of a train must be functions"_err_(g⊸⊏) tr>fe∨ff 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⊏𝕩 |