diff options
Diffstat (limited to 'test')
| -rw-r--r-- | test/fuzz.bqn | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/test/fuzz.bqn b/test/fuzz.bqn index cb5265c9..4aa41ea0 100644 --- a/test/fuzz.bqn +++ b/test/fuzz.bqn @@ -148,7 +148,8 @@ _testDyArith ← {f←𝕗 k←𝕩 rca ← Atom¨⟨gen.Char,gen.Arith⟩{k𝕎𝕩}¨sh Fit ← -⟜(@+1-˜17×2⋆16)⌈-⟜@⌊⊢ - ⟨⌽⍟(Rand 2)-∘Fit⟜-`,Fit`,(1+Fit)`⟩ { (𝕎rca)_t 𝕩 }¨¨ pmn + # Remove -⟜@ to test full-range ¬ (extended from 1+-) + ⟨⌽⍟(Rand 2)-∘Fit⟜-`,Fit`,(-⟜@⌊1+Fit)`⟩ { (𝕎rca)_t 𝕩 }¨¨ pmn { (sh (k gen.Char ⊣)⌾(1⊸⊑) rca)_t¨ 𝕩 }⍟(0<≠) ∾1↓pmn }⍟(ch∧0⊸<∧≤⟜5) 𝕨 } |