From d030b119ca512e0b0f3b44554ac96ce3eeb2350e Mon Sep 17 00:00:00 2001
From: Marshall Lochbaum <mwlochbaum@gmail.com>
Date: Sat, 12 Jun 2021 08:28:34 -0400
Subject: =?UTF-8?q?Add=20fuzz=20tests=20for=20character=20=C2=AC?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 test/fuzz.bqn | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'test')

diff --git a/test/fuzz.bqn b/test/fuzz.bqn
index 9c52f9d7..94819cc3 100644
--- a/test/fuzz.bqn
+++ b/test/fuzz.bqn
@@ -139,11 +139,12 @@ TestDyArith ← opts.dyArith{
     (𝕨⊸RandArith¨ sh)_t¨ f
     {
       k←𝕩
-      p‿m ← (∊/⊣)⟜f¨ ⟨+⟩‿⟨-⟩
+      p‿m‿n ← (∊/⊣)⟜f¨ ⟨+⟩‿⟨-⟩‿⟨¬⟩
       rca ← ⟨RandChar,RandArith⟩
       Fit ← -⟜(@+1-˜17×2⋆16)⌈-⟜@⌊⊢
       {     (⌽⍟(Rand 2) -∘Fit⟜-` rca{k𝕎𝕩}¨sh)_t 𝕩 }¨ p
       { s←Rand 2⋄(Fit`⍟s(⊣`⍟(¬s)rca){k𝕎𝕩}¨sh)_t 𝕩 }¨ m
+      { s←Rand 2⋄((1+Fit)`⍟s(⊣`⍟(¬s)rca){k𝕎𝕩}¨sh)_t 𝕩 }¨ n
     }⍟(0⊸<∧≤⟜5) 𝕨
   }
 }
-- 
cgit v1.2.3