Move from •EX to •Import

2 files changed, 4 insertions, 4 deletions

diff --git a/src/cjs.bqn b/src/cjs.bqn
index fc9db6f1..b481cdc0 100755
--- a/src/cjs.bqn
+++ b/src/cjs.bqn
@@ -1,6 +1,6 @@
 #! /usr/bin/env dbqn
 
-compile ← •EX •path∾"c.bqn"
+compile ← •Import •path∾"c.bqn"
 Comp ← ((<"runtime["∾⍕∾"]"˙)¨↕62)⊸Compile
 FP ← ∞⊸=◶⟨⍕,"Infinity"⟩
 Esc ← (⟨"\t","\n","\r","\'","\"""⟩∾<∘⥊)⊑˜("'"""∾˜@+9‿10‿13)⊑∘⊐⊢
@@ -13,7 +13,7 @@ Fout ← ⟨⊢,Fconst,L⟩ {L𝕎¨𝕩}¨ ⊢
 Frun ← ("provide.concat("∾∾⟜")")⌾(1⊸⊑) Fout
 Long ← ∾ (1‿2/⟨"  new Uint8Array("∾∾⟜")"⋄((@+10)∾" ,")⊸∾⟩) {𝕎𝕩}¨ ⊢
 • ← (⊑"r"‿"c"‿"fmt"⊐⊏)◶⟨
-  {𝕩⋄Long Frun {𝕩⊸↓⌾(1⊸⊑)Comp𝕨}´ •EX •path∾"pr.bqn"}
+  {𝕩⋄ref‿len←•Import•path∾"pr.bqn"⋄Long Frun len⊸↓⌾(1⊸⊑)Comp ref}
   {𝕩⋄Long Fout Comp J •LNS •path∾"c.bqn"}
   {𝕩⋄Long Fout Comp J •LNS •path∾"fmt.bqn"}
   ¯1 ↓ · J L∘Fout∘Comp¨
diff --git a/src/pr.bqn b/src/pr.bqn
index e028cbc5..77d664ff 100755
--- a/src/pr.bqn
+++ b/src/pr.bqn
@@ -26,6 +26,7 @@ Inc ← {
 # Required functionality passed in as an argument
 def ← ⟨"IsArray","Type","Log","GroupLen","GroupOrd"⟩
 keep ← "!+-×÷⋆⌊=≤≢⥊⊑↕⌜`⊘"
+len ⇐ def+○≠keep
 ki ← chr⊐keep
 kt ← (+`nc)(∾((≠def)∾¯1↓⊣)+⊔⟜⊒∘⍋)ki
 names ↩ (⥊¨kt⊏chr)⌾(ki⊸⊏)names
@@ -43,5 +44,4 @@ E_redef ← { # handles [fmd] [←↩]
   (E_proc 1↑𝕩) ∾ "←" ∾ tail
 }
 
-ref ← ∾∾⟜(@+10)¨ E_isdef◶E_proc‿E_redef¨ impl∾<"⟨"∾"⟩"∾˜1↓⥊","⊸∾˘chr
-⟨ref, def+○≠keep⟩
+ref ⇐ ∾∾⟜(@+10)¨ E_isdef◶E_proc‿E_redef¨ impl∾<"⟨"∾"⟩"∾˜1↓⥊","⊸∾˘chr