From a91db82531cc2f9e58d2fb76bbc159d1f16c9b6b Mon Sep 17 00:00:00 2001
From: Marshall Lochbaum <mwlochbaum@gmail.com>
Date: Wed, 12 Aug 2020 20:36:41 -0400
Subject: Use args r and c to compile runtime and compiler with cjs.bqn

---
 src/cjs.bqn | 8 +++++---
 1 file changed, 5 insertions(+), 3 deletions(-)

(limited to 'src')

diff --git a/src/cjs.bqn b/src/cjs.bqn
index d5566edf..8796df9a 100755
--- a/src/cjs.bqn
+++ b/src/cjs.bqn
@@ -10,6 +10,8 @@ L ← "["∾"]"∾˜1↓·∾","⊸∾⟜⍕¨
 G ← ⟨L∾⟜25,L Fmt¨,L⟨⊑"fmd"⊸⊐,⊢,⊢,≠⟩⊸(L{𝕎𝕩}¨)¨⟩ {𝕎𝕩}¨ 0‿1‿3 ⊏ Symcomp
 Gen ← L G
 GenLong ← ∾ (1‿2/⟨"  new Uint8Array("∾∾⟜")"⋄((•UCS 10)∾" ,")⊸∾⟩) {𝕎𝕩}¨ G
-• ← ∾∾⟜(•UCS 10)¨ Gen¨ •args
-#• ← GenLong •EX •path∾"pr.bqn"
-#• ← GenLong ∾∾⟜(•UCS 10)¨ •LNS •path∾"c.bqn"
+• ← (⊑"r"‿"c"⊐⊏)◶⟨
+  {𝕩⋄GenLong •EX •path∾"pr.bqn"}
+  {𝕩⋄GenLong ∾∾⟜(•UCS 10)¨ •LNS •path∾"c.bqn"}
+  ∾·∾⟜(•UCS 10)¨ Gen¨
+⟩ •args
-- 
cgit v1.2.3