aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorMarshall Lochbaum <mwlochbaum@gmail.com>2021-05-05 13:01:15 -0400
committerMarshall Lochbaum <mwlochbaum@gmail.com>2021-05-05 13:05:57 -0400
commitb0ad6041f146c23dfbb31016893709cd402ec4cb (patch)
tree198adcadcca5e59c759d8e84c339790f1a760019 /src
parent5a477b9cfe4653cd33a67ac5004eeb3565018e25 (diff)
Basic support for namespace creation and destructuring
Diffstat (limited to 'src')
-rw-r--r--src/f.bqn4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/f.bqn b/src/f.bqn
index 6144c31a..a32bbb45 100644
--- a/src/f.bqn
+++ b/src/f.bqn
@@ -81,13 +81,13 @@
# Format part of a compound operation; return precedence‿string
FmtOp ← {
- tn ← '*'(∾∾⊣)¨"array"‿"function"‿"1-modifier"‿"2-modifier"
+ tn ← '*'(∾∾⊣)¨"array"‿"function"‿"1-modifier"‿"2-modifier"‿"namespace"
FmtComp ← Type (3≤⊣)◶⟨0≍○<(1=≠)◶⟨⊑tn,⊏⟩∘FmtDat∘⊢, FmtOp⟩ ⊢
k ← ⊑ d ← Decomp 𝕩
p ← k ⊑ "00321111"-'0'
Paren ← "("∾∾⟜")"
FromComp ← ∾(⌽⍟(p>1)·-0=↕∘≠)(+⟜⊑Paren∘⊢⍟((2⌊p)≤⊣)1⊸⊑)⟜FmtComp¨⊢
- s ← (2⌊k)◶⟨⥊∘FF𝕩˙,(𝕨-2)◶tn,FromComp⟩ 1↓d
+ s ← (2⌊|k)◶⟨⥊∘FF𝕩˙,(𝕨-2)◶tn,FromComp⟩ 1↓d
s ↩ ∾⟜"{𝔽}"⍟(3>·Type ¯1⊑d˙)⍟(2≤p) s
p‿s
}