diff --git a/test/README.md b/test/README.md index 0a838834..0e8e83d8 100644 --- a/test/README.md +++ b/test/README.md @@ -10,7 +10,6 @@ test/run.bqn // run tests in test/cases/ ./BQN test/cmp.bqn // fuzz-test scalar comparison functions =≠<≤>≥ ./BQN test/equal.bqn // fuzz-test 𝕨≡𝕩 ./BQN test/copy.bqn // fuzz-test creating new arrays with elements copied from another -./BQN test/bitcpy.bqn // fuzz-test bit_cpy ./BQN test/bit.bqn // fuzz-test •bit functions ./BQN test/mut.bqn // fuzz-test mut.h (currently just bitarr fill) ./BQN test/hash.bqn // fuzz-test hashing diff --git a/test/bitcpy.bqn b/test/cases/fuzz/bitcpy.bqn similarity index 85% rename from test/bitcpy.bqn rename to test/cases/fuzz/bitcpy.bqn index fd318afc..0ecf4022 100644 --- a/test/bitcpy.bqn +++ b/test/cases/fuzz/bitcpy.bqn @@ -1,9 +1,7 @@ +### WHOLE-FILE-TEST +# tests bit_cpy +r ← (⊑•args).GetRand@ ⟨Temp, Type, Unshare, Squeeze, Info, Variation⟩ ← •internal -u ← ⌊100×(•UnixTime+1|100וMonoTime)@ -# u ↩ 123 - -r ← •MakeRand •Show u - Do ← { 𝕊: al ← 1+r.Range 500 @@ -32,10 +30,10 @@ Do ← { 𝕊: •Out "x: "∾F b •Out "xs: "∾•Repr bs •Out "l: "∾•Repr bl - •Exit 1 + !0 ;0 }∘@⍟500 @ ! a ≡ aT } -@∘Do⍟(⊑(•BQN¨•args)∾2000) @ \ No newline at end of file +@∘Do⍟2000 @