From 21a7ef69ffeeede1c7674e05ef723e90338c5945 Mon Sep 17 00:00:00 2001
From: Marshall Lochbaum <mwlochbaum@gmail.com>
Date: Sat, 31 Oct 2020 22:05:55 -0400
Subject: =?UTF-8?q?Pass=20filepath=20to=20GenHtml,=20since=20it=20is=20a?=
 =?UTF-8?q?=20scoped=20=E2=8D=8E?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 md.bqn               | 7 ++-----
 tutorial/evalexp.bqn | 1 +
 2 files changed, 3 insertions(+), 5 deletions(-)

diff --git a/md.bqn b/md.bqn
index 92c7090a..b54e27dd 100644
--- a/md.bqn
+++ b/md.bqn
@@ -161,10 +161,7 @@ blobURL ← repoURL∾"/blob/master/"
 
 # Environments
 _getCodeExec ← {𝕗⋄⍎}
-_getSvgExec ← {𝕗
-  Compile ← (↕62)⊸(•Import "src/c.bqn")  # for tutorial/evalexp.bqn
-  JoinLines⍟(1<≡)∘(⟨"svg.bqn","⍎"⟩ •Import "dzref")
-}
+_getSvgExec ← {𝕗⋄JoinLines⍟(1<≡)∘(⟨"svg.bqn","⍎"⟩ •Import "dzref")}
 
 
 ################################
@@ -310,7 +307,7 @@ Markdown ← {filename𝕊𝕩:
   ProcComment ← {
     n←≠s←"<!--GEN" ⋄ l←¯3↓⍟(1=≠𝕩)⊑𝕩 ⋄ a←s≡n↑l
     Source ← {((0<≠)◶<‿(•LNS path∾⊢) Trim n↓l) ∾ 1↓¯1↓𝕩}
-    GenHtml⍟a JoinLines Source⍟a 𝕩
+    ⟨⟨⟩,"",path⟩ GenHtml⍟a JoinLines Source⍟a 𝕩
   }
   ProcHtml ← {
     codeMask ← "<code>" (6⥊0)⊸»⊸(>○(⌈`(1+↕∘≠)⊸×))○(⍷⟜𝕩 ∾ 0⥊˜1-˜≠) "</code>"
diff --git a/tutorial/evalexp.bqn b/tutorial/evalexp.bqn
index d1d02f77..eff3aad2 100644
--- a/tutorial/evalexp.bqn
+++ b/tutorial/evalexp.bqn
@@ -14,6 +14,7 @@ Shadow ← {
   gt Enc ⟨gb,gf⟩ Enc¨<˘ t
 }
 
+Compile ← (↕62)⊸(•Import "../src/c.bqn")
 DrawEval←{
   b‿const‿blk‿i ← Compile 𝕩
   ba‿bc‿bo‿bp ← '0'-˜⟨ # For each instruction, number of:
-- 
cgit v1.2.3