aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorMarshall Lochbaum <mwlochbaum@gmail.com>2021-04-07 15:18:05 -0400
committerMarshall Lochbaum <mwlochbaum@gmail.com>2021-04-07 15:18:05 -0400
commit9e5d4b7758070e907ab542c9bfed82d6c34ac28c (patch)
treedd04cb9032f6dd25a685be40da31de504b8cbada /src
parent53af55a6d5966df5353b06b2791bb35da31b5dba (diff)
Passing system value indices is pointless
Diffstat (limited to 'src')
-rw-r--r--src/c.bqn3
1 files changed, 1 insertions, 2 deletions
diff --git a/src/c.bqn b/src/c.bqn
index 2d2a8d81..0b584507 100644
--- a/src/c.bqn
+++ b/src/c.bqn
@@ -67,8 +67,7 @@ Tokenize←{
# Deduplicate literals and identifiers; other cleanup
ki←(wt⍒⊸⊏/w)∾(ci∾/si)⊏+`»f # Indices in t
k←id∾num‿chr‿str⋄k(⊢>¯1»⌈`)⊸/¨˜↩j←⊐¨k # IDs j into uniques k
- Sl←(𝕎≍○<)⟜(⊏⟜charSet¨)
- 1⊸⊑{js‿ks←j Sl○𝔽k⋄j↩js⌾𝔽j⋄k↩ks⌾𝔽k} # System value lookup
+ k↩(𝕎⊏⟜charSet¨)⌾(1⊸⊑)k # System value lookup
wf←¬l∨t M bW⋄ie/˜↩wf∨>⟜«l # Index management for...
t↩(w∨wf)Fs(∾j++`vi»kk←≠¨k)⌾(ki⊸⊏)t # Add IDs; remove words/whitespace
t-↩t(M×-⟜⊑)bS # Separators are equivalent