aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMarshall Lochbaum <mwlochbaum@gmail.com>2020-07-01 13:25:24 -0400
committerMarshall Lochbaum <mwlochbaum@gmail.com>2020-07-01 13:25:24 -0400
commit34eb859263bb04b803a998d5493b01379e0ab745 (patch)
tree16a983147d6e298fc4fac84d304445a12ab53f26
parent58e388f1c0811cc598914f58032c78092b1edd8e (diff)
dzaima/BQN now supports Join with vector elements
-rwxr-xr-xspec/dzref6
1 files changed, 3 insertions, 3 deletions
diff --git a/spec/dzref b/spec/dzref
index 8a207c04..f5b97013 100755
--- a/spec/dzref
+++ b/spec/dzref
@@ -319,7 +319,7 @@ ProgressiveIndexOf ← {𝕨⊐○(≍˘⟜OccurrenceCount𝕨⊸⊐)𝕩}
"⌾⎉⚇⍟◶"
nc ← ≠¨chrs
- chr ← ∾´chrs
+ chr ← ∾chrs
itr ← 0⥊˜≠chr
init ← " "⊸∾¨(/⟜"_"¨nc/0‿1‿1)∾¨(nc/"FMD")∾¨(nc+´⊸↑⥊"AB"∾⌜•a)
@@ -353,7 +353,7 @@ ProgressiveIndexOf ← {𝕨⊐○(≍˘⟜OccurrenceCount𝕨⊸⊐)𝕩}
E_isdef ← (3≤≠)◶⟨0,∧´⟨chr," ","←↩"⟩∊˜¨3⊸↑⟩ ⍝ checks if line is a builtin redefinition
E_proc ← { ⍝ replaces built-ins with their corresponding names
- c←chr⊐𝕩 ⋄ ∾´⍟(0<≠)c(≥⟜(≠chr))◶⟨⊑⟜names,⥊∘⊢⟩¨𝕩
+ c←chr⊐𝕩 ⋄ ∾c(≥⟜(≠chr))◶⟨⊑⟜names,⥊∘⊢⟩¨𝕩
}
E_redef ← { ⍝ handles [fmd] [←↩]
@@ -364,5 +364,5 @@ ProgressiveIndexOf ← {𝕨⊐○(≍˘⟜OccurrenceCount𝕨⊸⊐)𝕩}
lf ← •UCS 10
pre ← E_isdef◶E_proc‿E_redef¨ lf((⊢-˜¬×+`)∘=⊔⊢)impl
- ⍎ ∾´ ∾⟜lf¨ pre ∾ E_proc¨ •STDIN⟨⟩
+ ⍎ ∾ ∾⟜lf¨ pre ∾ E_proc¨ •STDIN⟨⟩
}0