aboutsummaryrefslogtreecommitdiff
path: root/rt.bqn
diff options
context:
space:
mode:
authorMarshall Lochbaum <mwlochbaum@gmail.com>2021-11-07 19:07:48 -0500
committerMarshall Lochbaum <mwlochbaum@gmail.com>2021-11-07 19:12:06 -0500
commit0863b443d1d052cb684e3707a244727f693fba04 (patch)
tree89a5f317d24cabc6a23de7995b2403e9726a465e /rt.bqn
parent9429ddcf83c1e88a328160b40a124ea9a140005b (diff)
Add SetInv to extend inverse finder
Diffstat (limited to 'rt.bqn')
-rw-r--r--rt.bqn2
1 files changed, 1 insertions, 1 deletions
diff --git a/rt.bqn b/rt.bqn
index c0ae860b..764175e8 100644
--- a/rt.bqn
+++ b/rt.bqn
@@ -17,7 +17,7 @@ GroupLen ← {(𝕨⌈≠)⊸↑0 FillFn≠¨⊔𝕩}
extra ← ⟨ •Type, FillFn, ⋆⁼, GroupLen, ∾⊔∘⊢, _fillBy_ ⟩
provide ← { g←𝕩∊glyphs ⋄ (⍋⍋g)⊏extra∾•BQN∘⥊¨g/𝕩 } ∾need
-rt‿SetPrims ← VM ⟨provide,!∘0¨⟩ Compile src
+rt‿SetPrims‿SetInv ← VM ⟨provide,!∘0¨⟩ Compile src
PrimInd ← rt⊸⊐⌾<
Decompose ← ((≠glyphs)>PrimInd)◶⟨•Decompose,0⊸≍⟩
SetPrims ⟨ Decompose, PrimInd ⟩