diff options
| author | Marshall Lochbaum <mwlochbaum@gmail.com> | 2020-12-17 10:45:27 -0500 |
|---|---|---|
| committer | Marshall Lochbaum <mwlochbaum@gmail.com> | 2020-12-17 10:45:27 -0500 |
| commit | 9f3f0f9ffe71ff48e49999480306ca1e0c44ba4e (patch) | |
| tree | 5cb02afb6c3edeeb34845a10101b73f8ef8c6800 /src | |
| parent | 7e6f810b942c299eb57c25c41dd9e26056567f59 (diff) | |
Fix error from Bins with atom right argument
Diffstat (limited to 'src')
| -rw-r--r-- | src/r.bqn | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -484,7 +484,7 @@ _bins←{ cw←lw 𝔽○(⊑⟜(⥊𝕨)) _getCellCmp 0 "⍋ or ⍒: 𝕨 must be sorted" ! 0⊸<◶⟨1,∧´0≤˜·cw⟜(lw⊸+)⌜lw×↕∘-⟜1⟩≠𝕨 cx←c-˜=𝕩 - sx←cx Cell 𝕩 ⋄ lc←sw CmpLen sx + sx←cx Cell ToArray 𝕩 ⋄ lc←sw CmpLen sx cc ← (⊑⟜(⥊𝕨))⊸𝔽⟜(⊑⟜(⥊𝕩)) _getCellCmp´ lc B←(×´sw)⊸×⊸Cc≤0˜ (≠𝕨)⊸{B⟜𝕩 _binSearch 𝕨}⌜ (×´sx) × ⥊⟜(↕×´)⊑⟜(≢𝕩)⌜↕cx |