From 9c2945c10cd78d0444871c44aafa73ae7abb9c05 Mon Sep 17 00:00:00 2001
From: Marshall Lochbaum <mwlochbaum@gmail.com>
Date: Sun, 12 Jul 2020 19:30:49 -0400
Subject: =?UTF-8?q?Support=20nothing=20(=C2=B7)=20as=20a=20left=20non-argu?=
 =?UTF-8?q?ment?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

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

diff --git a/dc.bqn b/dc.bqn
index 085e3c1e..70147f54 100755
--- a/dc.bqn
+++ b/dc.bqn
@@ -10,6 +10,7 @@ charSet←∾charGroups←⟨
   "←↩→"                 # Gets
   "(){}⟨⟩"              # Bracket
   "‿"                   # Ligature
+  "·"                   # nOthing
   •d # +⟜(↕10)⌾•UCS'0'  # Digit
   "¯.π∞"                # Numeric
   "_"∾˜' '(+∾⊢)⌾•UCS•a  # Alphabetic
@@ -17,8 +18,8 @@ charSet←∾charGroups←⟨
   " "∾tab               # Whitespace
 # #'" eliminated during tokenization
 ⟩
-bF‿bM‿bC‿bI‿bS‿bG‿bB‿bL‿bD‿bN‿bA‿bP‿bW←⊔/≠¨charGroups
-vi←+´≠¨8↑charGroups
+bF‿bM‿bC‿bI‿bS‿bG‿bB‿bL‿bO‿bD‿bN‿bA‿bP‿bW←⊔/≠¨charGroups
+vi←+´≠¨9↑charGroups
 charRole←(vi+1)↑(/0∾≠¨3↑charGroups)∾10⥊↕2
 
 Tokenize←{
@@ -150,7 +151,7 @@ DParse ← {nv‿r𝕊𝕩:
   tf←(a≤○(⌈`(1+↕∘≠)⊸×)ps)∧(⊢∧2(|<≤)ps(⊢-⌈`∘×)+`)¬ro
   opa←op>1↓0∾˜ps∨a⋄os←⌽↕∘≠⊸(⊣-⌈`∘×)⌽¬ro
   oa←⌽/opa⋄fa←/(tf∨¬tr)∧(ro∧1⌽opa)<(r=1)∨op<¯1⌽opa
-  dy←fa⊏1↓0∾˜(tr∧r≥0)∨r=0
+  dy←fa⊏1↓0∾˜(𝕩≠⊑bO)∧(tr∧r≥0)∨r=0
   n←𝕩≥vi+nv⋄id←/n<𝕩≥vi⋄cn←/n∨𝕩≤¯1⊑bC⋄u←⍷ob←cn⊏𝕩
   lo←(o/𝕩)=4⊑bB⋄l←/𝕩=5⊑bB⋄ll←1+lo/1(↓--⊸↓)(o∾1)/+`(s∾0)-(1∾o)∧ps∾1
   dr←/s>o+`⊸⊏0∾lo
-- 
cgit v1.2.3