aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorMarshall Lochbaum <mwlochbaum@gmail.com>2020-09-28 08:44:52 -0400
committerMarshall Lochbaum <mwlochbaum@gmail.com>2020-09-28 08:44:52 -0400
commit607d68fc41147e07bc27f73e7d9a73e39fa9fd87 (patch)
treed001c8df4cc09661d4ccb4a0e8d246b06cb3066d /src
parentfd6791242177e880db399ac2368484ae5047fbe8 (diff)
Use a simple lookup table instead of ⊐ for primitive deduplication
Diffstat (limited to 'src')
-rw-r--r--src/c.bqn2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/c.bqn b/src/c.bqn
index 8a08171f..f600b7bc 100644
--- a/src/c.bqn
+++ b/src/c.bqn
@@ -138,7 +138,7 @@ Parse ← {r‿nv←𝕨
oa←⌽/op←(«r≥0)∧r≥2
fa←/(ta∨(ro∧«op)∨«aa)<(r=1)∨<⟜»op
dy←fa⊏«(𝕩≠⊑bO)∧(tr∧r≥0)∨ro<r=0
- ob←pr⊐˜u←⍷∧pr←𝕩⊏˜pi←/𝕩<sep
+ ob←pr⊏/¯1(⊢-»)u←⍷∧pr←𝕩⊏˜pi←/𝕩<sep
cn←pi∾lt←/𝕩≥ci←vi+nv⋄ob∾↩(ci-˜≠u)+lt⊏𝕩
s←𝕩=sep⋄fo←𝕩=2+⊑bB⋄ls←s∧fo<○IT lo←𝕩=4+⊑bB
ll←(¬lo/1«ps)+-⟜»1↓(lo∾1)/+`ls∾0