util/parse.bqn: use a better env

shnarazk · Jul 22, 2023 · 35265cc · 35265cc
1 parent a6993d8
commit 35265cc
Showing 1 changed file with 4 additions and 3 deletions.
diff --git a/utils/parse.bqn b/utils/parse.bqn
@@ -1,9 +1,10 @@
 #!/usr/bin/env cbqn
 # summarize a CSV file generated by `benchm`
 # Usage: parse.bqn generated.csv
-env ← {
-  v ← ⥊⊑∘⊐⟜'='⊸(↑⋈1⊸↓∘↓)¨{-¬(¬×1++`)𝕩=@+10}⊸⊔1⊑•SH<"env"
-  Map ⇐ {𝕨{d𝕊⟨k‿v⟩:v;d𝕊s:d}¨(</⟜v˜)˘𝕩{≡⟜⊑}⌜v}
+env←{
+  vars ⇐ ⍉>⊑∘⊐⟜'='⊸(↑⋈1⊸↓∘↓)¨{-¬(¬×1++`)𝕩=@+10}⊸⊔1⊑•SH<"env"
+  Var ⇐ {⊐⟜𝕩⊸⊏⟜(∾⟜@)˝vars}
+  Map ⇐ {@≡𝕩 ? 𝕨 ; 𝕩}¨⟜Var
 }
 csv‿util ← "/csv.bqn"‿"/util.bqn"•Import∘(∾˜)¨<⊑"."env.Map○⋈"BQN_LIB"
 Colored ← {