Pass set of primitive glyphs into compiler as •args

2 files changed, 8 insertions, 5 deletions

diff --git a/src/c.bqn b/src/c.bqn
index f6c1ccbb..f9151815 100644
--- a/src/c.bqn
+++ b/src/c.bqn
@@ -1,8 +1,9 @@
+func‿mod1‿mod2 ← •args
 lf←@+10
 charSet‿cgl←(∾ ≍○< ≠¨)⟨
-  "+-×÷⋆√⌊⌈|¬∧∨<>≠=≤≥≡≢⊣⊢⥊∾≍↑↓↕«»⌽⍉/⍋⍒⊏⊑⊐⊒∊⍷⊔!" # Function
-  "˙˜˘¨⌜⁼´˝`"           # 1-modifier
-  "∘○⊸⟜⌾⊘◶⎉⚇⍟⎊"         # 2-modifier
+  func                  # Function
+  mod1                  # 1-modifier
+  mod2                  # 2-modifier
   "⋄,"∾lf               # Separator
   "⇐←↩"                 # Gets
   "(){}⟨⟩"              # Bracket
diff --git a/src/cjs.bqn b/src/cjs.bqn
index e2e8b057..487740f0 100755
--- a/src/cjs.bqn
+++ b/src/cjs.bqn
@@ -18,7 +18,8 @@ F ← ⍕                         # Format number
 FP ← ∞⊸=◶⟨F,"Infinity"⟩       # Format positive number
 Num ← 0⊸≤◶⟨"-"∾FP∘|,FP⟩       # Format number
 
-compile ← •Import "c.bqn"
+glyphs ← •Import "glyphs.bqn"
+compile ← glyphs •Import "c.bqn"
 useInd ← "-i"≡⊑args←•args ⋄ args↓˜↩useInd
 Comp ← (3+useInd) ↑ ((<"runtime" Ind F)¨↕62)⊸Compile
 J ← ∾∾⟜(@+10)¨
@@ -29,7 +30,8 @@ Long ← ∾ (≠↑1‿3/⟨"  "⊸∾⋄((@+10)∾" ,")⊸∾⟩˙) {𝕎𝕩}
 SVG ← {∾⟨"Modify←GetHighlights←⊢⋄"⟩∾ •FChars∘∾⟜".bqn"¨ "../svg"‿𝕩}
 •Out (⊑"r"‿"c"‿"f"‿"e"‿"p"⊐⊏)◶⟨
   {𝕩⋄ref‿len←•Import"pr.bqn"⋄Long Frun len⊸↓⌾(1⊸⊑)Comp ref}
-  {𝕩⋄Long Fout Comp •FChars "c.bqn"}
+  {𝕩⋄g←"⟨"∾"⟩"«∾","⊸∾¨'"'(⊣∾∾˜)¨glyphs
+     Long Fout Comp J (¯5⊸↓∾g˙)⌾⊑ •FLines "c.bqn"}
   {𝕩⋄Long Fout Comp •FChars "f.bqn"}
   {𝕩⋄Long Fout Comp SVG "e"}
   {𝕩⋄Long Fout Comp SVG "p"}