diff options
| author | Marshall Lochbaum <mwlochbaum@gmail.com> | 2020-07-01 13:25:24 -0400 |
|---|---|---|
| committer | Marshall Lochbaum <mwlochbaum@gmail.com> | 2020-07-01 13:25:24 -0400 |
| commit | 34eb859263bb04b803a998d5493b01379e0ab745 (patch) | |
| tree | 16a983147d6e298fc4fac84d304445a12ab53f26 | |
| parent | 58e388f1c0811cc598914f58032c78092b1edd8e (diff) | |
dzaima/BQN now supports Join with vector elements
| -rwxr-xr-x | spec/dzref | 6 |
1 files changed, 3 insertions, 3 deletions
@@ -319,7 +319,7 @@ ProgressiveIndexOf ← {𝕨⊐○(≍˘⟜OccurrenceCount𝕨⊸⊐)𝕩} "⌾⎉⚇⍟◶" ⟩ nc ← ≠¨chrs - chr ← ∾´chrs + chr ← ∾chrs itr ← 0⥊˜≠chr init ← " "⊸∾¨(/⟜"_"¨nc/0‿1‿1)∾¨(nc/"FMD")∾¨(nc+´⊸↑⥊"AB"∾⌜•a) @@ -353,7 +353,7 @@ ProgressiveIndexOf ← {𝕨⊐○(≍˘⟜OccurrenceCount𝕨⊸⊐)𝕩} E_isdef ← (3≤≠)◶⟨0,∧´⟨chr," ","←↩"⟩∊˜¨3⊸↑⟩ ⍝ checks if line is a builtin redefinition E_proc ← { ⍝ replaces built-ins with their corresponding names - c←chr⊐𝕩 ⋄ ∾´⍟(0<≠)c(≥⟜(≠chr))◶⟨⊑⟜names,⥊∘⊢⟩¨𝕩 + c←chr⊐𝕩 ⋄ ∾c(≥⟜(≠chr))◶⟨⊑⟜names,⥊∘⊢⟩¨𝕩 } E_redef ← { ⍝ handles [fmd] [←↩] @@ -364,5 +364,5 @@ ProgressiveIndexOf ← {𝕨⊐○(≍˘⟜OccurrenceCount𝕨⊸⊐)𝕩} lf ← •UCS 10 pre ← E_isdef◶E_proc‿E_redef¨ lf((⊢-˜¬×+`)∘=⊔⊢)impl - ⍎ ∾´ ∾⟜lf¨ pre ∾ E_proc¨ •STDIN⟨⟩ + ⍎ ∾ ∾⟜lf¨ pre ∾ E_proc¨ •STDIN⟨⟩ }0 |
