diff options
| author | Marshall Lochbaum <mwlochbaum@gmail.com> | 2021-03-25 20:50:53 -0400 |
|---|---|---|
| committer | Marshall Lochbaum <mwlochbaum@gmail.com> | 2021-03-25 20:50:53 -0400 |
| commit | ec98071c058e68ab9f3eb62378cad09d05871ee5 (patch) | |
| tree | 408c9c3d2ad9e6a7ab1a473a1a370cf7b31346ea /bqn.bqn | |
| parent | a24022232647b8971cba425683f278f7befcf43f (diff) | |
Return a setter for Decompose and Glyph from the runtime so they don't have to be defined mutably
Diffstat (limited to 'bqn.bqn')
| -rw-r--r-- | bqn.bqn | 10 |
1 files changed, 4 insertions, 6 deletions
@@ -4,18 +4,16 @@ ⟨DRun,DCompile⟩ ← •Import "dc.bqn" ⟨ref,glyphs⟩ ← •Import "src/pr.bqn" -rt ← ⟨⟩ -PrimInd ← {⊑rt⊐<𝕩} -Decompose ← ((≠glyphs)>PrimInd)◶⟨•Decompose,0⊸≍⟩ provide ← ⟨ •Type # Type - Decompose # Decompose - glyphs⊑˜PrimInd # Glyph •FillFn # Fill ⋆⁼ # Log (≠¨⊔){𝔽⊘(↑⟜𝔽)} # GroupLen ∾⊔∘⊢ # GroupOrd !,+,-,×,÷,⋆,⌊,=,≤,≢,⥊,⊑,↕,⌜,`,•_fillBy_,⊘ ⟩ -rt ↩ •COMP provide⊸(⊣»«)⌾(1⊸⊑) DCompile ref +rt‿SetPrims ← •COMP provide⊸(⊣»«)⌾(1⊸⊑) DCompile ref +PrimInd ← rt⊸⊐⌾< +Decompose ← ((≠glyphs)>PrimInd)◶⟨•Decompose,0⊸≍⟩ +SetPrims ⟨ Decompose, glyphs⊑˜PrimInd ⟩ rt⊸DRun |