From 9e5d4b7758070e907ab542c9bfed82d6c34ac28c Mon Sep 17 00:00:00 2001
From: Marshall Lochbaum <mwlochbaum@gmail.com>
Date: Wed, 7 Apr 2021 15:18:05 -0400
Subject: Passing system value indices is pointless

---
 src/c.bqn | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

(limited to 'src')

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
-- 
cgit v1.2.3