From 91b5abe9fa8b2394606f0eb82bfaeb54fa8a33e8 Mon Sep 17 00:00:00 2001
From: Marshall Lochbaum <mwlochbaum@gmail.com>
Date: Tue, 7 Jul 2020 16:17:58 -0400
Subject: =?UTF-8?q?Use=20#=20instead=20of=20=E2=8D=9D=20for=20comments?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 dc.bqn | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'dc.bqn')

diff --git a/dc.bqn b/dc.bqn
index 70f51ff1..ea81ed6b 100755
--- a/dc.bqn
+++ b/dc.bqn
@@ -15,13 +15,13 @@ charSet←∾charGroups←⟨
   "_"∾' '(⊢∾+)⌾•UCS•a   ⍝ Alphabetic
   1↑"𝕨"                 ⍝ Prefix for input (hack around UTF-16)
   " "∾tab               ⍝ Whitespace
-⍝ ⍝'" eliminated during tokenization
+⍝ #'" eliminated during tokenization
 ⟩
 bF‿bM‿bC‿bI‿bS‿bG‿bB‿bL‿bD‿bN‿bA‿bP‿bW←⊔/≠¨charGroups
 vi←+´≠¨8↑charGroups
 
 Tokenize←{
-  r←𝕩='⍝'⋄s←/(≠↑2⊸↓)⊸∧𝕩=⊑"'"⋄d←/𝕩='"'
+  r←𝕩='#'⋄s←/(≠↑2⊸↓)⊸∧𝕩=⊑"'"⋄d←/𝕩='"'
   g←⍋q←∾⟨  s⋄¯1↓d⋄/r⟩ ⋄q↩g⊏q
   e← g⊏∾⟨2+s⋄ 1↓d⋄(⊢-¯1↓0∾⊢)∘⊏⟜(0∾+`r)⊸//(𝕩=nl)∾1⟩
   Se←{(⊏˜𝕨)Se 1¨⌾((𝕩/𝕨)⊸⊏)𝕩}⍟{0=⊑⌽𝕩}
-- 
cgit v1.2.3