aboutsummaryrefslogtreecommitdiff
path: root/src/e.bqn
diff options
context:
space:
mode:
authorMarshall Lochbaum <mwlochbaum@gmail.com>2020-11-21 11:31:49 -0500
committerMarshall Lochbaum <mwlochbaum@gmail.com>2020-11-21 11:31:49 -0500
commit3ea7eb8d18be52a989285e1a659be6ab76cc02b4 (patch)
treeadc6d77c137f36a7e1e983524b3116a3bf0f938e /src/e.bqn
parentbac1b187aae5b524b98f0f70223d3b1d02175a80 (diff)
Stop encoding bytecode with LEB128; that can be done later for serialization
Diffstat (limited to 'src/e.bqn')
-rw-r--r--src/e.bqn5
1 files changed, 1 insertions, 4 deletions
diff --git a/src/e.bqn b/src/e.bqn
index c242ce9f..506153ab 100644
--- a/src/e.bqn
+++ b/src/e.bqn
@@ -45,10 +45,7 @@ Explain ← {
"00000110111001001101000100" # Position determiner
m ← { # Mask of instruction starts
- a ← ba(⊣⊏˜≠⊸>×⊢)b
- na← ∾⟜≠ (≠-(1+↕∘≠)⊸(»·⌈`×)⌾⌽) <⟜128 b
- n ← 1+{(𝕩=⌜a) +˝∘× >⊏⟜na⍟𝕩↕≠a}↕3
- ! ∧´ ↕∘≠⊸< n
+ n ← (↕≠b)+1+ba(⊣⊏˜≠⊸>×⊢)b
Se←{(⊏˜𝕨)Se 1¨⌾((𝕩/𝕨)⊸⊏)𝕩}⍟(0=¯1⊑⊢)
(≠↑∾⟜≠Se 1∾0¨) n
}