diff options
| author | Marshall Lochbaum <mwlochbaum@gmail.com> | 2021-03-21 08:05:07 -0400 |
|---|---|---|
| committer | Marshall Lochbaum <mwlochbaum@gmail.com> | 2021-03-21 08:05:07 -0400 |
| commit | 56526738c2d603d828b090167be90e91dcfbedee (patch) | |
| tree | 7fa3369e2ec71dcf6cdf8bf5cad5265507011755 /src | |
| parent | d08b6642ecc9aa87bde761f828120eb8efa07365 (diff) | |
Fix handling of Nothing statements: no need to drop as there's no result
Diffstat (limited to 'src')
| -rw-r--r-- | src/c.bqn | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -214,7 +214,7 @@ Parse ← {r‿vn‿i‿e←𝕨⋄nv←≠vn s←𝕩=sep⋄fo←𝕩=2+⊑bB⋄ls←s∧fo<○IT lo←𝕩=4+⊑bB # List Separators: after ⟨lo, not {fo "Can't use Nothing (·) in lists"_err_(G) (»lo∨ls)∧ne ll←sll∾˜(¬lo/1«ps)+-⟜»1↓(lo∾1)/+`ls∾0 # List Length - dr←/ls<s⋄rt←/fo # Drop (block separator) and return + dr←/ne<ls<s⋄rt←/fo # Drop (block separator) and return fl←(dy×⊏⟜os)⊸+fa+dy # Function application site dr∾↩((1+dy)×fn←fa⊏ne)/fl # Turn function applications on · to drops fn↩¬fn⋄fa/˜↩fn⋄dy/˜↩fn⋄fl/˜↩fn # And remove them |