aboutsummaryrefslogtreecommitdiff
path: root/c.bqn
diff options
context:
space:
mode:
authorMarshall Lochbaum <mwlochbaum@gmail.com>2020-07-23 20:22:12 -0400
committerMarshall Lochbaum <mwlochbaum@gmail.com>2020-07-23 20:22:12 -0400
commit08204af36b09f5f9d7ebdc0ba1780016e6ef1bf7 (patch)
treef6a3e01b7189371d1a4b55f6d4f53dbb43fe5b58 /c.bqn
parent527ba44befb81f20bfc5389d4bcb448cb8f7190d (diff)
Remove underscores before lowercasing (was converting _ to A)
Diffstat (limited to 'c.bqn')
-rwxr-xr-xc.bqn2
1 files changed, 1 insertions, 1 deletions
diff --git a/c.bqn b/c.bqn
index bc53a5bc..cb31ed6c 100755
--- a/c.bqn
+++ b/c.bqn
@@ -37,7 +37,7 @@ Tokenize←{
w←(≠↑0∾⊢)⊸<l←c∊∾bD‿bN‿bA
i←(1-˜l×+`w)⊔c
na←≠•a⋄us←¯1⊑bA
- in←us⊸≠⊸/¨na(⊢-⊣×+⟜(⊑bA)⊸≤)i
+ in←na(⊢-⊣×+⟜(⊑bA)⊸≤)us⊸≠⊸/¨i
id←⍷(bA∊˜w/c)⍒⊸⊏in⋄nv←+´bA∊˜⊑¨id
c↩(w∨¬l∨c∊bP∾bW)/(vi+id⊐in)⌾(w⊸/)(vi+(≠id)+lu⊐lit)⌾(cl⊸/)c