aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rwxr-xr-xdc.bqn5
1 files changed, 3 insertions, 2 deletions
diff --git a/dc.bqn b/dc.bqn
index 4f1c544b..66e6b620 100755
--- a/dc.bqn
+++ b/dc.bqn
@@ -14,12 +14,13 @@ prims ← (•EX •path∾"dzref"){𝔽} "⟨
⟩"
special←<˘∘‿2⥊"𝕤𝕩𝕨𝕣𝕗𝕘"
-DRun←{
+DCompile←{
⟨bc,o,blk⟩ ← prims Compile 𝕩
blk ↩ {
⟨t,i,l,n⟩←𝕩
s←(3×i)↓(t⊑3‿5‿6)↑special
⟨t,i,l,s∾⥊¨'a'+↕n-≠s⟩
}¨blk
- •COMP ⟨bc,o,⟨⟩,blk⟩
+ ⟨bc,o,⟨⟩,blk⟩
}
+DRun←•COMP∘DCompile