Avoid using ∾ on two units in Wasm compiler

1 files changed, 8 insertions, 8 deletions

diff --git a/wc.bqn b/wc.bqn
index eed73e99..aeb260e9 100644
--- a/wc.bqn
+++ b/wc.bqn
@@ -34,14 +34,14 @@ MakeTab←{{⊑∘(∾⟜0)¨¯1↓(chF⊐𝕨)⊔○(∾⟜(≠chF))𝕩}○∾
 tab1←MakeTab⟨
   "⊣⊢"     , 2⥊<⟨⟩
   "|-⌈⌊√"  , (Hex"99")+(↕4)∾6
-  "÷"      , <(Hex"10")∾0
+  "÷"      , <(Hex"10")≍0
   "¬"      , <∾⥊¨⟨Hex"9A",GenF64 1,Hex"A0"⟩
 ⟩
 tab2←MakeTab⟨
   "⊣"      , Hex"1A"
   "+-×÷⌊⌈∧", (Hex"A0")+(↕6)∾2
   "¬"      , <∾⥊¨⟨Hex"A1",GenF64 1,Hex"A0"⟩
-  "∨"      , <(Hex"10")∾1
+  "∨"      , <(Hex"10")≍1
 ⟩
 fntab←⍉(0¨tab1)∾tab1≍tab2
 f64←127-3
@@ -55,11 +55,11 @@ GenFn←{
   t↩((vi+nVar+≠lits)+↕∘≠)⌾(c⊸/)t
   ⟨a,na⟩←WParse t
   ops←⥊∾⟨
-    ∾⟜(0⥊˜3∾˜vi-≠)fntab
-    ⍉(Hex¨"20"‿"22"‿"21")∾⌜↕nVar
-    ⊣⌜⟜(↕3)(GenF64¨lits)∾(Hex"10")∾¨3+↕nd
+    ∾⟜(0⥊˜3≍˜vi-≠)fntab
+    ⍉(Hex¨"20"‿"22"‿"21")≍⌜↕nVar
+    ⊣⌜⟜(↕3)(GenF64¨lits)∾(Hex"10")≍¨3+↕nd
   ⟩
-  (((≠∾∾)⟨nLoc∾f64⟩)∾(Hex"0B")∾˜∾)¨((⊢-˜¬×+`)a=2+⊑bB)⊔(na+3×a)⊏ops
+  (((≠∾∾)⟨nLoc‿f64⟩)∾(Hex"0B")∾˜∾)¨((⊢-˜¬×+`)a=2+⊑bB)⊔(na+3×a)⊏ops
 }
 
 Gen←{
@@ -73,7 +73,7 @@ Gen←{
    0∾("asm"-@)∾4↑1
    1 S V (96∾⟜∾C¨)¨t
    3 S V ⥊¨↕≠b
-   7 S V ⥊<"fn"I⊸(⊣∾0∾⊢)n
+   7 S V ⥊<"fn"I⊸(⊣∾0≍⊢)n
   10 S V C¨ b
   ⟩
 }
@@ -83,5 +83,5 @@ or ←2 GenFn "(w+x)-w∧x"
 WCompile←{
   body←GenFn 𝕩
   f←⟨rcp,or,body⟩
-  Gen ⟨(≠¨f)/(1‿2‿0∾¨1)⥊¨¨f64 ⋄ 2 ⋄ ∾f⟩
+  Gen ⟨(≠¨f)/(1‿2‿0≍¨1)⥊¨¨f64 ⋄ 2 ⋄ ∾f⟩
 }