diff options
| -rw-r--r-- | test/dzrt.bqn | 17 |
1 files changed, 5 insertions, 12 deletions
diff --git a/test/dzrt.bqn b/test/dzrt.bqn index ae217e07..a915a7ad 100644 --- a/test/dzrt.bqn +++ b/test/dzrt.bqn @@ -1,23 +1,16 @@ # Runtime hosted in dzaima/BQN ⟨src,need⟩ ← •Import "../src/pr.bqn" -⟨DRun⟩ ← •Import "dc.bqn" -⟨DCompile⟩ ← need •Import "dc.bqn" -glyphs ← ∾ gl ← •Import "../src/glyphs.bqn" +⟨DRun⟩ ← need •Import "dc.bqn" +glyphs ← ∾ •Import "../src/glyphs.bqn" GroupLen ← {(𝕨⌈≠)⊸↑0•FillFn≠¨⊔𝕩} extra ← ⟨ •Type, •FillFn, ⋆⁼, GroupLen, ∾⊔∘⊢, •_fillBy_ ⟩ -provide ← { g←𝕩∊glyphs ⋄ (⍋⍋g)⊏extra∾•BQN¨g/𝕩 } ∾need +provide ← { g←𝕩∊glyphs ⋄ (⍋⍋g)⊏extra∾•BQN∘⥊¨g/𝕩 } ∾need -rt‿SetPrims ← •COMP ⟨provide,(•BQN"•"⊸∾)¨⟩ DCompile src +rt‿SetPrims ← ⟨provide,!∘0¨⟩ DRun src PrimInd ← rt⊸⊐⌾< Decompose ← ((≠glyphs)>PrimInd)◶⟨•Decompose,0⊸≍⟩ SetPrims ⟨ Decompose, PrimInd ⟩ -sys ← {𝕩⊏˜𝕨⊸⊐}˝⍉>⟨ - "bqn"‿{BQN𝕩} - "type"‿•Type - "glyph"‿(glyphs⊑˜PrimInd) - "decompose"‿Decompose -⟩ -⟨rt,Sys⟩ +rt |